| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Градусы
A.H. © (2002-03-10 00:20:00)Мне нужно получить обратный косинус из числа в градусах, например чтобы из 0,5 получилось 60. Я пытался сделать это через ArcCos(0.5), но там выходит что-то совсем другое (~0,912134...). Кто-нибудь может написать полностью функционирующий пример, как подобное действие произвести ?
Очень нужно до понедельника.
Anatoly Podgoretsky (2002-03-10 15:56:00) [1]Ну тогда другое дело
A.H. (2002-03-10 15:52:00) [2]Анатолий, это я по невнимательности просто не то число списал, извиняюсь.
Anatoly Podgoretsky (2002-03-10 10:09:00) [3]У тебя какая то другая ошибка, результат должен быть более 1, а твой около 51 градуса. При ссылки на ошибку не мешает приводить исходный текст.
A.H. (2002-03-10 00:37:00) [4]Большое спасибо.
Tosov (2002-03-10 00:31:00) [5]Если тебе нужен арккосинус, то ты его и получил, но в радианах. Перевод в градусы RadToDeg или degrees = radians(180/pi).
var
a,b:Extended;
begin
a:=ArcCos(0.5);
ShowMessage(FloatToStr(a));
b:=RadToDeg(a);
ShowMessage(FloatToStr(b));
| |
