Ответы на вопрос:
Var i,s: longint; begin s: =1; for i: =23 downto 5 do beginif (i mod 2 = 0) then s: =s*i; end; writeln(s); end.
Популярно: Информатика
-
akarapiria403.04.2020 08:33
-
spongebob235304.12.2020 13:02
-
biryukovih08.05.2020 04:37
-
ti001317.01.2022 14:53
-
Zhora23123.05.2020 14:03
-
AndreevaAS227.07.2020 17:25
-
fgoolis5804.12.2021 04:38
-
LEH908.10.2020 13:36
-
movnar9809.05.2023 21:08
-
Marinka2908200421.10.2021 07:04