Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  
Подписаться на рассылку:
Клуб программистов


Основы Delphi
Pi
Функция
Математическая константа System unit
  function Pi : Extended;
Описание
Функция Pi возвращает значение с плавающей запятой, дающее полезное приближение значения Пи.

Длина окружности = Пи * Диаметр.
Похожие команды
Cos  Косинус числа

Extended  Тип с плавающей запятой обладающий самой высокой точностью и вместимостью

Sin  Синус числа

Tan  Тангенс числа

 
Пример кода : Получение площади и длины окружность круга
var
  myPi : Extended;
  diam : Integer;
begin
  diam := 10;

  // Показ длины окружности и площади круга
  // с диаметром - 10 см
  ShowMessage('Диаметр = '+IntToStr(diam));
  ShowMessage('Длина окружнрости = '+FloatToStr(Pi*diam));
  ShowMessage('Площадь = '+FloatToStr(Pi*(diam/2)*(diam/2)));
end;
Диаметр = 10
Длина окружности = 31.4159265358979
Площадь = 78.5398163397448
 



© Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки  |     |  Английская версия