Посчитать сумму и произведение натуральных чисел от 100 до 123( операции программирования паскаль.это просто тема)

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

begin
  Writeln('S=',Range(100,123).Sum);
  Writeln('П=',Range(100,123).Aggregate(Biginteger(1),(x,y)->x*y))
end.

Результат
S=2676
П=13014890091970928141156779500966563174744064000000