Question

Значение функции ех (экспонента от х) равно сходящейся сумме бесконечного ряда: Получите рекуррентную формулу для слагаемых. Используя операторы цикла While, Repeat и For, составьте три варианта программы вычисления суммы с заданным числом слагаемых.

Answer 1

program ExponentialSeries;
var   x, sum, term: real;   n, i: integer;
begin   writeln('Введите значение x: ');   readln(x);
     writeln('Введите количество слагаемых (n): ');   readln(n);
     sum := 1; // Первое слагаемое
     term := 1;
     for i := 1 to n do   begin     term := term * (x / i);     sum := sum + term;   end;
     writeln('Сумма ряда ех (', n, ' слагаемых) = ', sum:0:6);
     readln; end.