Задание 7 Параграф 2.4 ГДЗ Босова 9 класс 2017 (Информатика)

Задача

Здесь n! — факториал числа n. n! = 1*2* … * (n — 1) * n. Используйте функцию вычисления факториала.

Подробный ответ

Для вычисления суммы $$s = 1! + 2! + 3! + \dots + n!$$ удобно сначала написать функцию, которая находит факториал числа.

Факториал определяется так:

$$1! = 1,$$
$$a! = a \cdot (a-1)! \text{ при } a > 1.$$

Затем в основной программе нужно:

ввести $$n$$;
обнулить сумму $$s$$;
в цикле от $$1$$ до $$n$$ прибавлять к $$s$$ значение $$i!$$;
вывести результат.

program fact_f;
var
  n, i: integer;
  s: longint;
function fac(a: integer): longint;
begin
  if a = 1 then fac := 1 else
  fac := a * fac(a — 1);
end;
begin
  write(‘введи число>>’);
  readln(n);
  s := 0;
  for i := 1 to n do
    s := s + fac(i);
  writeln(‘Сумма = ‘, s)
end.