Вычислить сумму членов рядаz = 1 + x^2/2! + x^4/4! + … + x^20/20! = 1 + S(для i от 1 до 10) x^(2i)/(2i)!Для вычисления значения члена ряда использовать рекуррентную фор-мулу y[n]=y[n-1]x^2/[2n(2n-1)] — Pascal(Паскаль)

uses crt;
var z,x,p:double;
i:integer;
begin
clrscr;
write('x=');readln(x);
z:=1;p:=sqr(x)/2;
for i:=2 to 11 do
   begin
     z:=z+p;
     p:=p*sqr(x)/(2*i*(2*i-1));
   end;
write('z=',z:0:8);
readln
end.

Leave a Comment

− 7 = 3