Функция Cos – косинус числа

Функция Cos в Delphi – косинус числа.

System unit

function Cos (const Number : Extended) : Extended;

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

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

Примечание.

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

Функция Cos: Получение косинуса 60 градусов

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