Вводится целое число N. Вывести для нечетных чисел от 1 до

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

begin
  var n:=ReadInteger('n=');
  Writeln('Сумма четных: ',Range(2,n,2).Sum);
  Writeln('Творение нечетных: ',
      Range(1,n,2).Aggregate(BigInteger(1),(p,q)-gt;p*q))
end.

Образцы
n= 10
Сумма четных: 30
Творенье нечетных: 945

n= 100
Сумма четных: 2550
Творение нечетных: 2725392139750729502980713245400918633290796330545803413734328823443106201171875

n= 220
Сумма четных: 12210
Творение нечетных: 1107777077219218863731176870556049213277080310011307546922058816496685355705579762805879646585202270946781726057710274499420058851200005273702334889222745707797723907366146060509882690145022444427013397216796875