библиотеку kolmath из KOL там можешь посмотреть вот эту функцию для
нахождения ArcCos
function ArcCos(X: Extended): Extended;
begin
Result := ArcTan2(Sqrt(1 - X*X), X);
end;
а так же другие функции для нахождения других тригонометрических величин.begin
Result := ArcTan2(Sqrt(1 - X*X), X);
end;

[size=-2]------ Добавлено в 19:58
Galkov, Что то я непонял зачем надо было делать компонент Math и
записывать туда то ,что есть в уже готовой библиотеке kolmath.
