Вычислить произведение четных чисел от 1 до 200

kulagindemid20 kulagindemid20    2   12.09.2019 07:00    1

Ответы
fiyyk fiyyk  07.10.2020 09:07
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(Range(2,200,2).Aggregate(BigInteger(1),(p,q)->p*q))
end.

Результат
118305033024544857808171402556304773068330423943453950860219552506842483018552459750131300382609551649116952455583587373444882662176634718152559553931916976653860864000000000000000000000000
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика