Главная страница
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.007 c
6-80634
Дмитрий
2002-01-09 21:20
2002.03.25
Небуферизованный вывод


1-80580
DJ X
2002-03-10 17:12
2002.03.25
Как запускать процедуру из DLL


1-80483
KIR
2002-03-12 15:05
2002.03.25
Изменение шрифта отдельной ячейки TStringGrid a


1-80505
shamen
2002-03-12 13:26
2002.03.25
Как добавить свою кнопку в панель инструментов Word из внешней проги на Delphi


3-80393
Мефодий
2002-02-25 12:20
2002.03.25
Алгоритм для редактирования данных