arctan в Delphi

[alikon1]

Windows калькулятор выдает tg(9)=83,65980825409009060400586233 5173 (Тангенс в градусах, с отмеченной галочкой INV)

а Delphi:
edit1.Text:=floattostr(arctan(9)); выдает 1,460139105621;
edit1.Text:=floattostr(arctan(degto rad(9))); выдает 0,155806499969542
edit1.Text:=floattostr(arctan(radto deg(9))); выдает 1,56885707450144

А как же все-таки получить эти самые Windows'овские 83,6598082...

[Квэнди]

radtodeg(arctan(9))

[mihali4]

Может, я чего не понял, но причем тут ARCTAN, когда есть функция TAN?
Вообще интересно - на калькуляторе вычисляется тангенс, а в Дельфи - арктангенс, и почему-то все удивляются, что результаты разные...
Если я не ошибаюсь, арктангенс=1/тангенс.

если в calc отметить галку INV то будет вычисляться обратная функция

Понял. Я этим калькулятором никогда не пользовался.
А вот конструкция radtodeg(arctan(9)) меня изумляет...

[Квэнди]

mihali4, если в calc отметить галку INV то будет вычисляться обратная функция. Вопрос был больше в правильном переводе между градусами и радианами )

[Alar]

Функция ArcTan является математической функцией, выдающая значение арктангенса числа в радианах.

Пи радиан = 180 градусов

http://delphibasics.ru/ArcTan.php

Функция RadToDeg - математическая функция, преобразовывающая значение радиана в градусы.

Пи радиан = 180 градусов.

http://delphibasics.ru/RadToDeg.php

Функция Tan является математической функцией, возвращающей тангенс значения Number в радианах

Пример кода : Получение Тангенса 45 градусов 
var
  float : single;
begin
  // Тангенс 45 градусов = 1.0
  float := Tan(PI/4);   // = 180/4 = 45 градусов
  ShowMessage('Tan(PI/4) = '+FloatToStr(float));
end;
Tan(PI/4) = 1

http://delphibasics.ru/Tan.php