Ответы на вопрос:
Begin var b: integer; writeln('введите n'); readln(b); writeln('имеем последовательность'); var a : = range(1, b); a.println(); writeln('произведение четных равно'); writeln(a.where(x -> x mod 2 = 0).aggregate(1, (p, x) -> p * x)); end.
Популярно: Информатика
-
Stoianova198810.02.2022 13:59
-
FireGame22805.05.2020 10:50
-
Aleksa41323.11.2021 06:28
-
apabud02.06.2021 01:00
-
mikimouse928.03.2021 18:14
-
diamond1277p08lfa18.03.2021 21:36
-
FinaSan29.10.2020 18:43
-
Mrt200428.10.2020 15:33
-
Oneheest18.12.2021 13:20
-
maksym20017807.02.2023 04:26