Програмиа паскаль.Написать программу которая будет считать факториал,а затем сумму...

Question

Програмиа паскаль.Написать программу которая будет считать факториал,а затем сумму факториалов (все в одной программе).Желательно как можно проще составить.

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

begin
  var s:BigInteger;
  for var i:=1 to ReadInteger('Введите количество слагаемых->') do
     s+=Range(1,ReadInteger('n!=')).Aggregate((r,n)->r*n).Println;
  Println('Сумма=',s);
end.

Пример:
Введите количество слагаемых-> 3
n!= 4
24 
n!= 3
6 
n!= 5
120 
Сумма= 150