Разное
Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>
    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.



Последние книги
Самое популярное
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация



Вопросы
  Функции дат в SQL
   Категория: Базы данных
  Компонент PopupMenu
   Категория: Компоненты
  Как показать balloon tooltips в программе
   Категория: Приложение
  Как найти наибольший общий делитель
   Категория: Математика
  Группировка TopAdvGrid
   Категория: Компоненты
  Объект экрана — Screen
   Категория: Компоненты
  Перегенерировать все индексы Dbase
   Категория: Базы данных
  Список ошибок BDE
   Категория: Базы данных
  Вычислить логарифм
   Категория: Математика

Получить бесплатно смазку для секса в этом сексшопе реальность!
Delphi - Справочник: Cos

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Cos
function Cos ( const Number : Extended ) : Extended;
Функция (Unit System)
Косинус числа
Описание:
Функция Cos находит косинус угла в радианах.

PI радиан = 180 градусов
Пример кода: Получение косинуса 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
Примечание:
Модуль System поддерживает только следующие угловые функции:

ArcTan
Sin
Cos

  << Вернуться