Облака / 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.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Распознавание кодировки. Перекодировка.
   Категория: Текст и строки
  Как получить дату создания файла
   Категория: Файловая система
  Возвести в степень
   Категория: Математика
  Сохранение странички в файл из TWebBrowser
   Категория: Интернет и Сети
  Определить МАС-адрес карты
   Категория: Интернет и Сети
  Изменить пароль для Paradox
   Категория: Базы данных
  Получить имена всех папок и файлов в директории
   Категория: Файловая система
  Создание цветных строк в ListBox
   Категория: Компоненты
  Узнать все IP-адреса компьютера
   Категория: Интернет и Сети

Delphi - Справочник: Pi

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

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

Длина окружности = Пи * Диаметр.
Пример кода: Получение площади и длины окружность круга

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

  << Вернуться