задача 4 урок 11
Primary tabs
Задача 4 урок 11
Решите с помощью цикла while:
Выведите на экран, все четные числа от 35 до 117 и нечетные числа, лежащие в диапазоне от 45 до 99.
Указание: сначала можно решить задачу двумя циклами, но потом перепишите с использованием одного цикла, в теле которого составьте логическое выражение, описывающее подходящие числа (используйте логические операции).
//Способ 1 var a, b: integer; begin a := 36; b := 45; while (a <= 118) do begin write(a, ' '); a := a + 2; end; writeln(); while (b <= 100) do begin write(b, ' '); b := b +2; end; writeln('Exit'); readln(); end. //Способ 2 var a: integer; begin a := 35; while (a <= 118) do begin if ((a mod 2)=0) OR (((a mod 2)=1) AND ((a > 44) AND (a < 100)))then write(a, ' '); a := a + 1; end; writeln('Exit'); readln(); end.
- Log in to post comments
- 1183 reads
vedro-compota
Thu, 08/05/2021 - 19:08
Permalink
решение засчитано
решение засчитано
_____________
матфак вгу и остальная классика =)