Question

Написать цикл на паскале, который составляет матрицы(размеры- n рядков, m-столбцов) заполненные сверху вниз числами от 1 до n*m (пример):
1 4 7
2 5 8
3 6 9

Answer 1

var n,m,i,j,k:integer;

begin
read(n,m);
for i:=1 to n do
 begin
 k:=i;
 writeln;
 for j:=1 to m do
   begin
   write(k,' ');
   k:=k+n;
   end;
 end;
end.