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

http://fkn.ktu10.com/?q=node/8697

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

program task9_lesson13_1;
var m, n, i, j : integer;
begin
  writeln('Enter M'); // сколько раз вывести последовательность
  readln(m);
  writeln('Enter N'); // макс число в последовательности
  readln(n);
         for i := 1 to m do
             begin
                  for j := 1 to n do
                      write(j, ' ' );
                  writeln();
             end;
  readln();
end.