Ответы на вопрос:
Var n, i : longint; begin readln(n); for i: = 2 to n do if (i mod 2 < > 0) and (i mod 3 = 0) then begin write(i); write(' '); end; end; end.
Популярно: Информатика
-
zyxra418.02.2022 09:59
-
dasha513222.07.2020 00:25
-
ajgizaahmetsina06.10.2021 01:47
-
t0l1k08.02.2022 10:47
-
7273722.06.2023 05:18
-
нрпаллмаегли25.03.2022 05:22
-
DiankaTokmashova01.12.2020 03:59
-
domaris24617.06.2020 13:46
-
lim15508.08.2022 07:38
-
Snikers201809.05.2021 20:17