Задана матрица 3x3 ** вещественных чисел, нужно вывести элементы ** экран.Каждый элемент...

Question

Задана матрица 3x3 на вещественных чисел, нужно вывести элементы на экран.Каждый элемент матрицы умножить на 5, полученную матрицу вывести на экран.

Answer 1

// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=MatrRandomReal(3,3,-15,15);
  a.Println(8,3); Writeln(24*'-');
  for var i:=0 to 2 do
    for var j:=0 to 2 do a[i,j]*=5;
  a.Println(8,3)
end.

Пример
   2.785  -2.514  -6.530
  14.026  -3.859  -7.406
  12.838 -11.692 -12.349
------------------------
  13.923 -12.572 -32.651
  70.128 -19.295 -37.030
  64.188 -58.462 -61.744