Решение задачи 11 из главы 11
Primary tabs
11. Вывести на экран все числа от 4 до 100 с шагом 4
program Project11; var a: integer; begin a:= 0; while ( a <= 100) do begin a:=a+4; if (a > 100) then break; write(a, ' '); end; readln(); end.
- Log in to post comments
- 1570 reads
vedro-compota
Tue, 10/13/2020 - 14:15
Permalink
для тренировки: добавьте в
для тренировки: добавьте в комментарии альтернативное решение без break
_____________
матфак вгу и остальная классика =)
testok
Fri, 10/16/2020 - 01:55
Permalink
program Project11;
testok
Fri, 10/30/2020 - 05:24
Permalink
еще вариант