Задача 4 Урок 11
Primary tabs
Решите с помощью цикла while:
Выведите на экран, все четные числа от 35 до 117 и нечетные числа, лежащие в диапазоне от 45 до 99
program lesson11_4; var a : integer; begin a := 35; while a <= 117 do begin if a mod 2 = 0 then write(a, ' ') else if (a >= 45) and (a <= 99) then write(a, ' '); a := a + 1; end; readln(); end.
- Log in to post comments
- 1053 reads
vedro-compota
Sun, 07/25/2021 - 12:20
Permalink
Решение засчитано
Решение засчитано
_____________
матфак вгу и остальная классика =)