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