Задача 2 Урок 13.2
Primary tabs
Задача 2 Урок 13.2Составьте программу, которая выводит на экран прямоугольный флаг N×M вида (c чередованием плюсов и минусов в строках, используйте циклы while):
- - - - - -
+ + + + + +
- - - - - -
+ + + + + +
- - - - - -
var m, n, i, j: integer; begin i:= 1; j:= 1; m:= 5; n:= 6; while (i <= m) do begin while (j <= n) do begin if ((i mod 2) <> 0) then write('- ') else write('+ '); j:= j + 1; end; writeln(); i:= i + 1; j:= 1; end; readln(); end.
- Log in to post comments
- 583 reads