Дано целое число N. Найти значение выражения 1+2!+3!+...+N!,результат вывести как действительное число. (N! = 1·2·3·…·N – N факториал) pascal
Дано целое число 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
Гостьпрога в приложении ============
Не нашли ответ?
Похожие вопросы