Задание 9 Урок 13.1

Задание 9 Урок 13.1

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

var i,j,n,m: integer;
begin
writeln('vvedite kolichestvo raz');
   readln(m);
writeln('vvedite do kokogo chisla');
   readln(n);

  i := 1;
  while (i <= m) do
    begin
      for j := 1 to n do
        write(j, ' ');
      writeln();
    i:=i+1;
    end;
  readln();
end.