Написать программу, которая в последовательности целых чисел вычисляет произведение трехзначных четных чисел, оканчивающихся на 2. Признаком окончания ввода чисел является ноль.
Ответы
Ответ дал:
0
Ответ:
PascalABC.NET
begin
var sqnc := ReadSeqIntegerWhile(x -> x <> 0);
sqnc.Where(x -> (x >= 100) and (x < 1000) and (x mod 10 = 2) and (x mod 2 = 0))
.Aggregate(Biginteger.One, (p, q) -> p * q).Println;
end.
Объяснение:
Похожие вопросы
2 года назад
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад