Рекурсия

Тема в разделе "Visual Basic", создана пользователем -, 9 сен 2011.

  1. Гость

    Составить программу вычисления суммы:
    ((x^1)/1!)- ((x^3)/3!)+ ((x^5)/5!)- ((x^7)/7!)+...-(-1)^n*((x^n)/n!)
    При увеличении n эта сумма приближается к значению sin(x).
    помогите пожалуйста,
    есть вариант решения в паскале, но не понимаю как оно составлено
    Код (LotusScript):
    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
     
Загрузка...
Похожие Темы - Рекурсия
  1. vera2014
    Ответов:
    0
    Просмотров:
    1.073
  2. 95процентов
    Ответов:
    7
    Просмотров:
    1.912
  3. 95процентов
    Ответов:
    0
    Просмотров:
    946
  4. 95процентов
    Ответов:
    0
    Просмотров:
    1.015
  5. vladis222
    Ответов:
    10
    Просмотров:
    2.385

Поделиться этой страницей