Вводятся два числа а и в (в> а). вывести на экран числа, которые делятся на 3, но не делятся на 5 и их количество. (паскаль)
246
443
Ответы на вопрос:
Var a, b, i, count: integer; begin readln(a); readln(b); count: =0; for i: =a to b do if (i mod 3 = 0) and (i mod 5 < > 0) then begin inc(count); writeln(i); end; writeln('количество = ', count); end.
Популярно: Информатика
-
milisochka121.02.2021 03:09
-
228даша22813.05.2020 06:31
-
хзхзхзхззз28.03.2022 17:32
-
эги111.01.2022 02:33
-
boltushkin0111.08.2020 10:28
-
tairovazukhra01.03.2020 14:00
-
кристина262619.01.2022 15:38
-
avaitekhovich25.03.2022 13:37
-
garipova0223.12.2022 05:56
-
Vika32ytr402.09.2022 02:21