Вниз
Скачать: 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.45 MB
Время: 0.034 c
15-1159789639
Quester
2006-10-02 15:47
2006.10.22
Сложная программа


2-1160396333
yel
2006-10-09 16:18
2006.10.22
Быстро сохранить запись (record)


2-1159782195
Steep
2006-10-02 13:43
2006.10.22
Поиск


4-1149177664
DeStranger
2006-06-01 20:01
2006.10.22
Как заставить систему воспринимать USB порт как COM


3-1156827594
Layner
2006-08-29 08:59
2006.10.22
Не могу прогнать запрос из Delphi в бд Access, поле с датой..




   Наверх