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