Přidáno 496 bajtů,
5. 10. 2012, 13:35 Vrací arcus tangens argumentu.
;Deklarace
function ArcTan(X: Reálný): Reálný;
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:Turbo Pascal nemá funkci [[Tan]], ale tangens může být vypočítán výrazem:
Sin(x) / Cos(x)
ArcSin(x) = ArcTan (x/sqrt (1-sqr (x))) ArcCos(x) = ArcTan (sqrt (1-sqr (x)) /x)
Vzorový příklad
{Arctan.PAS}
{Vzorový příklad pro funkci ArcTan .}
var
R: Real;
begin
R := ArcTan(Pi);
end.
[[Category:System]]
[[Category:Funkce System]]