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