Напишите программу вычисления выражения: s=1!+2!+3! + ... + n! Здесь n! - факториал числа n. n!=12 ... * (n-1) * n. Используйте функцию вычисления факториала.

Question

Матвей Назаров

Информатика

5 декабря, 20:44

Напишите программу вычисления выражения: s=1!+2!+3! + ... + n! Здесь n! - факториал числа n. n!=12 ... * (n-1) * n. Используйте функцию вычисления факториала.

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Алиса Бурова · Answer 1

function fak (n: integer) : uint64;

var

i: integer;

rez: uint64;

begin

rez : = 1;

for i : = 1 to n do

rez : = rez * i;

fak : = rez;

end;

var

s, i, n: integer;

begin

readln (n);

for i : = 1 to n do

s : = s + fak (i);

write (s);

end.

Напишите программу вычисления выражения: s=1!+2!+3! + ... + n! Здесь n! - факториал числа n. n!=1*2 * ... * (n-1) * n. Используйте функцию вычисления факториала.

Напишите программу вычисления выражения: s=1!+2!+3! + ... + n! Здесь n! - факториал числа n. n!=12 ... * (n-1) * n. Используйте функцию вычисления факториала.