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

Вложенные циклы

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

var l,m,n: integer;
begin
  writeln('write M num');
  readln(m);
  writeln('write N num');
  readln(n);
  repeat
    for l:=1 to n do
      write(l,' ');
    if (l=n) then
      writeln();
    m:=m-1;
  until (m=0);
  readln();
end. 

//write M num
//5
//write N num
//25
//1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
//1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
//1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
//1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
//1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25