Показать сообщение отдельно
Старый 06.04.2009, 18:53   #5
Dj_Alex
ПроЭктировщик
 
Аватар для Dj_Alex
 
Регистрация: 08.03.2009
Адрес: Saransk
Сообщений: 143
Написано 25 полезных сообщений
(для 45 пользователей)
Ответ: Lib_dbl : java double support

program NewProject2121;
uses dbl;
var n:integer;
s,v:string;
begin
v:='0.1';
n:=1;
dbl.init(20);
dbl.set(0,v);//x
dbl.copy(1,0);//sn
dbl.copy(3,0);//y
s:=dbl.get(1);
while (stringtoreal(s,10)>0.0000000001) do begin
dbl.set(2,'0.5');
dbl.mul(2,0);
dbl.mul(2,0);
dbl.set(4,''+n);
dbl.set(5,'1.0');
dbl.set(6,'2.0');
dbl.div(5,4);
dbl.plus(6,5);
dbl.mul(2,6);
dbl.mul(1,2);
dbl.set(5,'1.0');
dbl.set(6,'2.0');
dbl.mul(6,4);
dbl.plus(6,5);
dbl.copy(7,1);
dbl.div(7,6);
dbl.div(7,6);
dbl.plus(3,7);
n:=n+1;
s:=dbl.get(1);
end;
drawText('arsin '+dbl.get(3), 0,0);
drawText(''+n, 0,20);
drawText(''+stringtoreal(v,10), 0,40);
repaint;	
delay(200000);
end.
написал вычисление arcsin при помощи старой либы. работает вроде правильно. однако заметил, что при малых значениях аргумента, arsin имеет значение близкое к аргументу. и чем меньше значение, тем разница меньше. поэтому надобность в функции отпала, т.к. у мня значения аргумента оч. малы.
(Offline)
 
Ответить с цитированием