Miniklad
5 год назад
Написать цикл на паскале, который составляет матрицы(размеры- n рядков, m-столбцов) заполненные сверху вниз числами от 1 до n*m (пример):
1 4 7
2 5 8
3 6 9
ОТВЕТЫ
Ираклиевич
Aug 9, 2019
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.
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.
90
Смежные вопросы: