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
 



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