Задана квадратная матрица. Получить транспонированную матрицу, т.е. матрицу,...

Question

Задана квадратная матрица. Получить транспонированную матрицу, т.е. матрицу, где столбцы и строки меняются местами. (Pascal) Закомментировать логику

Answer 1

PascalABC.NET

Ответ:

• begin
• var n := ReadInteger('n:');
• var a := MatrRandom(n,n,-99,99);
• var b := MatrGen(n,n,(i,j)->a[j,i]);
• a.Print;
• Writeln;
• b.Print;
• end.

Пример работы:

Comments

Комментарии ?

Answer 2

// PascalABC.NET

begin

 var n := ReadInteger('n =');

 var a := MatrRandom(n, n, -99, 99);

 a.Println;

 Writeln;

 a := Transpose(a);

 a.Println

end.

Объяснение:

Я не понимаю значение фразы "закомментировать логику", но в любом случае, в решении никакой "логики" нет. Поскольку тут она не нужна.

Comments

Под "Закоментировать логику" вероятнее всего автором подразумевалось то, что "Напишите мне код с комментами, что бы я мог не вникая Ctrl+c - Ctrl+V и скинуть это своему преподавателю")