При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида

@Yura97 · Регистрация: 28.09.2015

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

При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида, а также сумму тех слагаемых, которые по абсолютной величине больше E. Для второго случая выполните суммирование для двух значений E, отличающихся на порядок, и при этом определите количество слагаемых, включенных в сумму. Сравните результаты с точным значением функции, для которой данная сумма определяет приближенное значение при x, лежащем в интервале (–R, R)
c) In(x+√(x^2+1))=-1/2* x^3/3+(1*3/2*4)*x^5/5- (1*3*5/2*4*6)* x^7/7 + ... (R=1)

@Puporev · 28.09.2015, 07:25

В ряде пропущен нулевой член, ряд начинается так x-1/2* x^3/3.....

Pascal

uses crt;
var x,e,t,s:real;
    n,i:integer;
begin
clrscr;
repeat
write('Ведите |x|<1 x=');
readln(x);
until abs(x)<1;
{1 случай, N слагаемых}
write('n=');
readln(n);
t:=x;
s:=t;
for i:=1 to n do
 begin
  t:=-t*x*x*(2*i-1)/(2*i);
  s:=s+t/(2*i+1);
 end;
writeln('s=',s:0:5);
 
{2 случай, с заданной точностью}
e:=0.0001;
i:=0;
t:=x;
s:=t;
while abs(t)/(2*i+1)>e do
 begin
  i:=i+1;
  t:=-t*x*x*(2*i-1)/(2*i);
  s:=s+t/(2*i+1);
 end;
writeln('При точности 0.0001 s=',s:0:5,' n=',i);
e:=0.00001;
i:=0;
t:=x;
s:=t;
while abs(t)/(2*i+1)>e do
 begin
  i:=i+1;
  t:=-t*x*x*(2*i-1)/(2*i);
  s:=s+t/(2*i+1);
 end;
writeln('При точности 0.00001 s=',s:0:5,' n=',i);
writeln('Точное значение=',ln(x+sqrt(x*x+1)):0:5);
readln
end.

@Yura97 · 28.09.2015, 07:37 **[ТС]**

Спасибо) Очень признателен!!!

Добавлено через 10 минут
Puporev, точно... Даже списать нормально не смог.

@Yura97 0 / 0 / 0 Регистрация: 28.09.2015 Сообщений: 9
		1
	При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида 28.09.2015, 01:01. Показов 3425. Ответов 2 Метки нет (Все метки) При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида, а также сумму тех слагаемых, которые по абсолютной величине больше E. Для второго случая выполните суммирование для двух значений E, отличающихся на порядок, и при этом определите количество слагаемых, включенных в сумму. Сравните результаты с точным значением функции, для которой данная сумма определяет приближенное значение при x, лежащем в интервале (–R, R) c) In(x+√(x^2+1))=-1/2* x^3/3+(13/24)x^5/5- (135/246) x^7/7 + ... (R=1) 0

@Yura97 0 / 0 / 0 Регистрация: 28.09.2015 Сообщений: 9
	28.09.2015, 07:37 [ТС]	3
	Спасибо) Очень признателен!!! Добавлено через 10 минут Puporev, точно... Даже списать нормально не смог. 0

Опции темы

При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида

Решение