Задача 9 Урок 13.1
Primary tabs
M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
1......N}M раз
var i,j,m,n: integer;
begin
write('vvedite 4islo M - ');
readln(m);
write('vvedite 4islo N - ');
readln(n);
begin
for i := 1 to m do
begin
for j := 1 to n do
write(j, ' ' );
writeln();
end;
end;
readln();
end.- Log in to post comments
- 725 reads