Вычислить приближенное значение суммы бесконечного ряда, не пользуясь операцией возведения в степень

@Chigl · Регистрация: 04.04.2015

Студворк — интернет-сервис помощи студентам

Вычислить приближенное значение суммы бесконечного ряда, не пользуясь операцией возведения в степень.
Не могу составить программный код, нужна помощь

$https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \cos x=\sum_{n=0}^\infty (-1)^n\,\frac{x^{2n}}{(2n)!}<br />$

@Puporev · 04.04.2015, 18:30

Pascal

var x,e,s,t:real;
   n:integer;
begin
write('x=');
readln(x);
repeat
write('e>0 e=');
readln(e);
until e>0;
if e>=1 then s:=1
else
 begin
  s:=1;
  t:=1;
  n:=0;
  while abs(t)>e do
   begin
    n:=n+1;
    t:=-t*x*x/((2*n-1)*(2*n));
    s:=s+t;
   end;
 end;
writeln('Сумма=',s:0:4);
write('Cos(x)=',cos(x):0:4);
end.

@Chigl · 04.04.2015, 19:08 **[ТС]**

Благодарю за ответ, у меня есть ещё 2 примера, я не могу разобраться с ними

@Puporev · 04.04.2015, 19:59

Первая формула неверная, там в числителе должно быть xⁿ

Pascal

var x,t,s,e:real;
    n:integer;
begin
write('x=');
readln(x);
repeat
write('e>0 e=');
readln(e);
until e>0;
if e>=1 then s:=1
else
 begin
  n:=0;
  t:=1;
  s:=1;
  while abs(t)>e do
   begin
    n:=n+1;
    t:=-t*x/n;
    s:=s+t;
   end;
 end;
writeln('S=        ',s:0:6);
write('e^(',-x:0:2,')=',exp(-x):0:6);
end.

Добавлено через 8 минут
Во второй ОДЗ=]-1;1]

Pascal

var x,t,s,e:real;
    n:integer;
begin
repeat
write('x=(-1;1] x=');
readln(x);
until(x>-1)and(x<=1);
repeat
write('e>0 e=');
readln(e);
until e>0;
if e>=1 then s:=x
else
 begin
  n:=1;
  t:=x;
  s:=x;
  while abs(t)/n>e do
   begin
    n:=n+1;
    t:=-t*x;
    s:=s+t/n;
   end;
 end;
writeln('S=      ',s:0:6);
write('ln(1+x)=',ln(1+x):0:6);
end.

@Chigl · 04.04.2015, 20:41 **[ТС]**

Спасибо Огромное

@Chigl 0 / 0 / 0 Регистрация: 04.04.2015 Сообщений: 7
		1
	Вычислить приближенное значение суммы бесконечного ряда, не пользуясь операцией возведения в степень 04.04.2015, 18:19. Показов 1649. Ответов 4 Метки нет (Все метки) Вычислить приближенное значение суммы бесконечного ряда, не пользуясь операцией возведения в степень. Не могу составить программный код, нужна помощь $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \cos x=\sum_{n=0}^\infty (-1)^n\,\frac{x^{2n}}{(2n)!}<br />$ 0

@Chigl 0 / 0 / 0 Регистрация: 04.04.2015 Сообщений: 7
	04.04.2015, 19:08 [ТС]	3
	Благодарю за ответ, у меня есть ещё 2 примера, я не могу разобраться с ними Миниатюры 0

@Chigl 0 / 0 / 0 Регистрация: 04.04.2015 Сообщений: 7
	04.04.2015, 20:41 [ТС]	5
	Спасибо Огромное 0

Опции темы

Вычислить приближенное значение суммы бесконечного ряда, не пользуясь операцией возведения в степень

Решение