Задача 9 Урок 13

Урок 13.1

M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
11......NN}M раз

var a, i: integer;

begin
  writeln('Vvedite kolichestvo cifr v stroke');
  readln(a);
  writeln('Vvedite kolichestvo strok');
  readln(i);
  for i := 1 to i do
  begin
    for a := 1 to a do
      write(a, ' ');
    writeln();
  end;
end.

КОНСОЛЬ

Vvedite kolichestvo cifr v stroke
8
Vvedite kolichestvo strok
10
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8 
1 2 3 4 5 6 7 8