Задать вопрос
30 ноября, 13:33

Вычислить 1!+2!+3! + ... + n!, используя функцию для вычисления факториала k!=1*2*3 * ... * k

+3
Ответы (1)
  1. 30 ноября, 15:04
    0
    Function Fact (n: integer) : longint;

    vat i: integer;

    f: longint;

    begin

    f:=1;

    for i:=2 to n do f:=f*i;

    fact:=f

    end;

    var N: integer;

    i: integer;

    sum:real;

    begin

    readln (n);

    s:=0;

    for i:=1 to n do

    s:=s+fact (i);

    writeln (s:6:0);

    end
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Вычислить 1!+2!+3! + ... + n!, используя функцию для вычисления факториала k!=1*2*3 * ... * k ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы