Question

Дан двумерный массив n*m заполненный случайным образом заменить элементы последней строки на элементы 3 строки. ​

Answer 1

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

begin

 var (n, m) := ReadInteger2('Задайте n и m:');

 if n < 4 then

 begin

   Print('Ошибка: n < 4');

   exit

 end;

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

 a.Println;

 Writeln;

 a.SetRow(n - 1, a.Row(2));  // это замена строки

 a.Print

end.