Дано целое число n. найти значение выражения 1+2! +3! ++n! ,результат вывести как действительное число. (n! = 1·2·3·…·n – n факториал) pascal

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  var n:=ReadInteger('n=');
  var s:=BigInteger(0);
  var p:=Biginteger(1);
  for var i:=1 to n do begin p*=i; s+=p end;
  Print(s)
end.

Тестовые решения
n= 5
153

n= 10
4037913

n= 50
31035053229546199656252032972759319953190362094566672920420940313

Прога в приложении