Delphi-Help

Описание

function Cos ( const Number : Extended ) : Extended;

Функция Cos находит косинус угла в радианах.
PI радиан = 180 градусов

Пример кода

var
float : single;
begin
// Cos(60) = 0.5
float := Cos(PI/3);   // = 180/3 = 60 градусов
ShowMessage('Cos(PI/3) = '+FloatToStr(float));
end;

Cos(PI/3) = 0.5

Примечание

Модуль System поддерживает только следующие угловые функции:
ArcTan
Sin
Cos