Задача 1 урок 13.2
Primary tabs
Задача 1 урок 13.2
Составьте программу, которая выводит на экран прямоугольный флаг N×M вида (используйте циклы repeat):
- - - - - - - - - - - - - - - - - - - - - - - -
var N, M, i, j: integer; begin i :=1; j :=1; writeln('Vvedite N > 0'); readln(N); writeln('Vvedite M > 0'); readln(M); repeat repeat write('- '); j := j+1; until(j > M); writeln(); i :=i+1; j :=1; until(i > N); readln(); end.
- Log in to post comments
- 1109 reads