Задача 7 Урок 14.1
Primary tabs
Составьте программу, которая выводит на экран прямоугольный флаг N×M вида (используйте циклы repeat):
- - - - - - - - - - - - - - - - - - - - - - - -- для вывода очередной строки используйте процедуру.
program u141z7; var m,n: integer; procedure p7(a,b:integer); var i,j: integer; begin for i:=1 to a do begin for j:=1 to b do write('- '); writeln(); end; end; begin writeln('Vvedite N u M'); readln(n); //кол-во строк readln(m); //кол во символов в строке p7(n,m); readln(); end.
- Log in to post comments
- 411 reads
vedro-compota
Sun, 12/25/2022 - 13:09
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)