Задача 3 Урок 13.2
Primary tabs
{13.2 — 3 Составьте программу, которая выводит на экран прямоугольный флаг N×M вида
(с рамкой по краям):
+ + + + + +
+ - - - - +
+ - - - - +
+ + + + + +}
var m,n,i: integer; begin m := 9; for i:=1 to m do begin for n:=1 to m do if ((i=1) or (i=m) or (n=m) or (n=1)) then write('+ ') else write ('- '); writeln(); end; readln(); end.
//+ + + + + + + + + //+ - - - - - - - + //+ - - - - - - - + //+ - - - - - - - + //+ - - - - - - - + //+ - - - - - - - + //+ - - - - - - - + //+ - - - - - - - + //+ + + + + + + + +
- Log in to post comments
- 1226 reads
vedro-compota
Thu, 05/27/2021 - 20:26
Permalink
решение засчитано
решение засчитано
_____________
матфак вгу и остальная классика =)