Урок 13.2 Задача 1

Урок 13.2 Задача 1

Составьте программу, которая выводит на экран прямоугольный флаг N×M вида (используйте циклы repeat)

var M, N, i, j: integer;
begin
  i:=1;
  j:=1;
  readln(M);
  readln(N);
  repeat
    repeat
      write('- ');
      j:=j+1;
    until j>N ;
    writeln();
    i:=i+1;
    j:=1;
  until i>M  ;

  readln();
end.