Question

Дан целочисленный двумерный массив, размерности n х m. Заменить все элементы на их квадраты. Паскаль.

Answer 1

===== PascalABC.NET =====

begin

 var (n, m) := ReadInteger2('Введите n и m:');

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

 a.Println(6);

 a.Transform(p -> p * p);

 Writeln;

 a.Println(6)

end.