Вывести все числа в диапазоне от 15 до 125,являющиеся четными и кратными 3
189
296
Ответы на вопрос:
Var i, k: integer; begin for i : = 15 to 125 do if (i mod 2 = 0) and (i mod 3 = 0) then write(i, '; '); end.
Популярно: Информатика
-
DashaL0414.10.2021 05:09
-
Полькаа164205.01.2023 12:20
-
asikg2726.03.2020 06:27
-
Брат22001.06.2020 21:29
-
БекБека02.01.2021 05:31
-
kino201112.05.2020 16:16
-
Wow0129.01.2020 19:35
-
Tcgdfh28.10.2021 15:39
-
kakashonka104.05.2022 08:06
-
anyta00620.10.2021 00:40