Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k

@Алексей 3 · Регистрация: 26.04.2017

Author24 — интернет-сервис помощи студентам

Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k.

@Skyer · 27.04.2017, 23:38

Pascal

var
n,i,s:integer;
 
function fakt(x:integer):integer;
var
  i,f:integer;
begin
  f := 1;
  for i := 2 to x do 
    f := f * i;
  fakt := f;
end;
 
begin
  readln(n);
  s:=0;
  for i:=1 to n do
    s := s + fakt(i);
  writeln(s);
end.

@Алексей 3 0 / 0 / 0 Регистрация: 26.04.2017 Сообщений: 10
		1
	Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k 27.04.2017, 19:57. Показов 8753. Ответов 1 Метки нет (Все метки) Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k. 0

	27.04.2017, 23:38

Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k

Решение