Рекурсия

  • Автор темы Guest
  • Дата начала
G

Guest

Составить программу вычисления суммы:
((x^1)/1!)- ((x^3)/3!)+ ((x^5)/5!)- ((x^7)/7!)+...-(-1)^n*((x^n)/n!)
При увеличении n эта сумма приближается к значению sin(x).
помогите пожалуйста,
есть вариант решения в паскале, но не понимаю как оно составлено
Код:
uses crt;
var x,s,t:real;
n,i:integer;
begin
clrscr;
write('x=');readln(x);
write('n=');readln(n);
s:=x;t:=1;
for i:=1 to n do
begin
t:=t*((-1)*x*x)/(2*i*(2*i+1));
s:=s+t;
end;
writeln('Приближенное значение sinx=',s:10:8);
writeln('Аналитическое значение sinx=',sin(x):10:8);
readln
end
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!