Найти произведение чисел, кратных трем в диапазоне от 30 до 50

jauprosto jauprosto    2   28.07.2019 03:50    0

Ответы
katyaden2 katyaden2  03.10.2020 15:05
//PascalABC.NET 3.1 сборка 1219
begin
    var a := Range(30, 50).Where(x -> x mod 3 = 0).Aggregate(1, (s, x)-> s * x);
    PrintLn(a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика