Разное
Облака / Clouds

The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>

time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: Pi
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 |