Question

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

Answer 1

// 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

Answer 2

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

056c8a3e4460c00692539e8caad1573f.pas