Функция начинается
с заголовка, за которым следуют разделы объявления констант, типов и переменных,
а также раздел инструкций.
Объявление функции
в общем виде выглядит следующим образом:
function
Имя (СписокПараметров) :
Тип;
const
// начало раздела объявления констант
type
// начало раздела объявления типов
var
// начало раздела объявления переменных
begin
// начало раздела инструкций
result
:= Значение; // связать с именем функции значение
end;
Заголовок функции начинается
словом function, за которым следует имя функции. После имени функции в скобках
приводится список параметров, за которым через двоеточие указывается тип значения,
возвращаемого функцией (тип функции). Завершается заголовок функции символом
"точка с запятой".
За заголовком функции
следуют разделы объявления констант, типов и переменных.
В разделе инструкций,
помимо переменных, перечисленных в разделе описания переменных, можно использовать
переменную result. По завершении выполнения инструкций функции значение этой
переменной становится значением функции. Поэтому среди инструкций функции обязательно
должна быть инструкция, присваивающая переменной result значение. Как правило,
эта инструкция является последней исполняемой инструкцией функции.
Ниже в качестве примера
приведена функция FuntToKg, которая пересчитывает вес из фунтов в килограммы:
//
Пересчет веса из фунтов в килограммы
function
FuntToKg(f:real):real;
const
//
в России 1 фунт равен 409,5 гр.
К=0.4095;
// коэф. Пересчета
begin
result:=f*K;
end;
Знаете ли Вы, почему "черные дыры" - фикция? Согласно релятивистской мифологии, "чёрная дыра - это область в пространстве-времени, гравитационное притяжение которой настолько велико, что покинуть её не могут даже объекты, движущиеся со скоростью света (в том числе и кванты самого света). Граница этой области называется горизонтом событий, а её характерный размер - гравитационным радиусом. В простейшем случае сферически симметричной чёрной дыры он равен радиусу Шварцшильда". На самом деле миф о черных дырах есть порождение мифа о фотоне - пушечном ядре. Этот миф родился еще в античные времена. Математическое развитие он получил в трудах Исаака Ньютона в виде корпускулярной теории света. Корпускуле света приписывалась масса. Из этого следовало, что при высоких ускорениях свободного падения возможен поворот траектории луча света вспять, по параболе, как это происходит с пушечным ядром в гравитационном поле Земли. Отсюда родились сказки о "радиусе Шварцшильда", "черных дырах Хокинга" и прочих безудержных фантазиях пропагандистов релятивизма. Впрочем, эти сказки несколько древнее. В 1795 году математик Пьер Симон Лаплас писал: "Если бы диаметр светящейся звезды с той же плотностью, что и Земля, в 250 раз превосходил бы диаметр Солнца, то вследствие притяжения звезды ни один из испущенных ею лучей не смог бы дойти до нас; следовательно, не исключено, что самые большие из светящихся тел по этой причине являются невидимыми." [цитата по Брагинский В.Б., Полнарёв А. Г. Удивительная гравитация. - М., Наука, 1985] Однако, как выяснилось в 20-м веке, фотон не обладает массой и не может взаимодействовать с гравитационным полем как весомое вещество. Фотон - это квантованная электромагнитная волна, то есть даже не объект, а процесс. А процессы не могут иметь веса, так как они не являются вещественными объектами. Это всего-лишь движение некоторой среды. (сравните с аналогами: движение воды, движение воздуха, колебания почвы). Подробнее читайте в FAQ по эфирной физике.
