Объявление функции

function ИмяФункции(var Параметр1: Тип 1; var Параметр2: Тип2;
var ПараметрJ: TиnJ ) : Тип;

const

{ описание констант }

var

{ описание переменных }

begin

{ инструкции функции }

Result:=Значение;

end;

Примечание

Слово var ставится перед именем параметра в том случае, если параметр используется для возврата значения из функции в вызвавшую ее программу.