Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.25;
Скачать: CL | DM;

Вниз

Градусы   Найти похожие ветки 

 
A.H.   (2002-03-10 00:20) [0]

Мне нужно получить обратный косинус из числа в градусах, например чтобы из 0,5 получилось 60. Я пытался сделать это через ArcCos(0.5), но там выходит что-то совсем другое (~0,912134...). Кто-нибудь может написать полностью функционирующий пример, как подобное действие произвести ?

Очень нужно до понедельника.


 
Tosov ©   (2002-03-10 00:31) [1]

Если тебе нужен арккосинус, то ты его и получил, но в радианах. Перевод в градусы RadToDeg или degrees = radians(180/pi).

var
a,b:Extended;
begin
a:=ArcCos(0.5);
ShowMessage(FloatToStr(a));
b:=RadToDeg(a);
ShowMessage(FloatToStr(b));


 
A.H.   (2002-03-10 00:37) [2]

Большое спасибо.


 
Anatoly Podgoretsky ©   (2002-03-10 10:09) [3]

У тебя какая то другая ошибка, результат должен быть более 1, а твой около 51 градуса. При ссылки на ошибку не мешает приводить исходный текст.


 
A.H.   (2002-03-10 15:52) [4]

Анатолий, это я по невнимательности просто не то число списал, извиняюсь.


 
Anatoly Podgoretsky ©   (2002-03-10 15:56) [5]

Ну тогда другое дело



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

Текущий архив: 2002.03.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
4-80720
Cranium
2002-01-25 01:47
2002.03.25
Как с помощью API под Windows 2000 server писать в LPT?


14-80665
С_тоша
2002-02-11 16:03
2002.03.25
Срочно НУЖНА ПОМОЩЬ!!!!!


1-80558
SuperIgor
2002-03-10 01:16
2002.03.25
Winamp


14-80655
ilysha
2002-02-07 09:02
2002.03.25
Кто-то спрашивал про Update Delphi 6. Это здесь.


14-80669
Shiza
2002-02-08 18:43
2002.03.25
Вирусы в Delphi