Найти сумму 1!+2!+3!+_+N! (n!=1*2*3*...*n)

Question

Найти сумму 1!+2!+3!+_+N!
(n!=1*2*3*...*n)

Comments

да

Answer 1

Учитывая, что в условии не обозначены границы N, придется воспользоваться возможностями PascalABC.Net

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
  var f: BigInteger := 1;
  var s: BigInteger := 0;
  var n := ReadInteger;
  for var i := 1 to n do
  begin
    f:=1;
    for var j := 1 to i do f *= j;
    s := s + f;
  end;
  println('Сумма факториалов ', s);
end.

Тестовое решение
n=100
Сумма факториалов  94269001683709979260859834124473539872070722613982672442938359305624678223479506023400294093599136466986609124347432647622826870038220556442336528920420940313

Comments

ого,спасибо