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

Question

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

Answer 1

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

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

Результат
118305033024544857808171402556304773068330423943453950860219552506842483018552459750131300382609551649116952455583587373444882662176634718152559553931916976653860864000000000000000000000000