Вниз
Скачать: CL | DM;

Цикл   Найти похожие ветки 

 
Серый ©   (2006-10-01 13:28) [0]

Нужно посчитать значение
arth(x)=x+(x^3/3)+(x^5/5)+..Главная пролема заключается в организации цикла

d:=x;
i:=3;
x2:=x*x;
while (fabs(d)>eps) do
begin
d:=d*x2/(i);
i:=i+2;
end;
А именно ошибка в числителе выражения d:=d*x2/(i).
Что это за ошибка?


 
Kolan ©   (2006-10-01 13:32) [1]


> Что это за ошибка?

Так что за ошибка?


 
MBo ©   (2006-10-01 13:35) [2]

dd:=x;
arth := x;
i:=1;
x2:=x*x;
while (abs(d)>eps) do
begin
 dd:=dd*x2;
 i:=i+2;
 d := dd/i;
 arth := arth + d;
end;

P.S. ряд сходится медленно, если x не очень мало...


 
Думкин ©   (2006-10-01 18:18) [3]


> MBo ©   (01.10.06 13:35) [2]
> dd:=x;
> arth := x;
> i:=1;
> x2:=x*x;
> while (abs(d)>eps) do
> begin
>  dd:=dd*x2;
>  i:=i+2;
>  d := dd/i;
>  arth := arth + d;
> end;
>
> P.S. ряд сходится медленно, если x не очень мало...


Если больше 1, то вообще расходится.


 
guav ©   (2006-10-01 18:59) [4]

А зачем вообще через ряд находить, когда есть простая формула в Math.ArcTanh ?


 
Думкин ©   (2006-10-02 05:43) [5]

> guav ©   (01.10.06 18:59) [4]

Некоторые типа иногда учатся.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
2-1159968752
POP
2006-10-04 17:32
2006.10.22
Вычленить все цифры в числе


2-1160058261
maverick_man
2006-10-05 18:24
2006.10.22
Подскажите плиз


1-1157757381
tio
2006-09-09 03:16
2006.10.22
сделать невидимым процесс своей программы в XP


15-1159783567
Slider007
2006-10-02 14:06
2006.10.22
С днем рождения ! 28 сентября


6-1148991296
Забияка
2006-05-30 16:14
2006.10.22
TIdHTTPServer (Indy 10): ответ порциями без разрыва соединения




   Наверх