Задача 3 Урок 13.2
Primary tabs
Задача 3 Урок 13.2Составьте программу, которая выводит на экран прямоугольный флаг N×M вида (с рамкой по краям):
+ + + + + +
+ - - - - +
+ - - - - +
+ + + + + +
var m, n, i, j: integer; begin m:= 4; n:= 6; for i:= 1 to m do begin for j:= 1 to n do if (j = 1) or (j = n) or (i = 1) or (i = m) then write('+ ') else write('- '); writeln(); end; readln(); end.
- Log in to post comments
- 631 reads