Задание 1 Урок 13.2

Задание 1 Урок 13.2

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

- - - - - -
- - - - - -
- - - - - -
- - - - - -

var m,j: integer;
begin
m:=0;
j:=0;
  repeat
    repeat
       write('- ');
       j:=j+1;
     until(j>=6);

    m:=m+1;
    j:=0;
    writeln();
  until(m>=4);

readln();
end.