отыскать сумму 1!+2!+3!+_+N!(n!=1*2*3*...*n)

Отыскать сумму 1!+2!+3!+_+N!
(n!=1*2*3*...*n)

Задать свой вопрос
Анжелика Рогаль-Левицкая
да
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




Рита Чурпета
ого,спасибо
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт