Дано вещественное число X и целое число N (> 0). Найти значение выражения X – X3/(3!) +...

Question

Дано вещественное число X и целое число N (> 0). Найти значение выражения X – X3/(3!) + X5/(5!) – … + (–1)N·X2·N+1/((2·N+1)!) (N! = 1·2·…·N). Полученное число является приближенным значением функции sin в точке X. питон

Answer 1

Ответ:

program For23;

var

 X,Rez,factorial,pow:Real;

 N, i :Integer;

begin

 Write('Введите X: ');

 Readln(X);

 Write('Введите N: ');

 Readln(N);

 Rez:=0;

 pow:=1;

 factorial:=1;

 For i:=1  to 2*N+1 do

  begin

   factorial:=factorial*i;

   pow:=pow*X;

   if (i mod 2) <>0 then

    begin

     Rez:=Rez+pow/factorial;

     pow:=pow*(-1);

    end;

  end;

 Writeln(Rez);

end.

Comments

Нажмите "Спасибо", если мой ответ помог Вам! :з