profile
Опубликовано 6 лет назад по предмету Информатика от nikkkka666

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

  1. Ответ
    Ответ дан ingr

    var

       n : integer;

       S : decimal;

       

    function fac(n : integer) : decimal;

    begin

       result := 1;

       for var i := 1 to n do result := result * i;

    end;


    begin

       write('введите n = ');

       readln(n);

       for var i := 1 to n do S := S+fac(i);

       writeln('S=', S);

    end.

Самые новые вопросы