Функции

Оформляет подпрограмму как функцию целесообразно только в том случае если ожидается некоторый результат работы подпрограммы если же последовательность команд ориентировано на выполнение некоторых действий (выдача информаций на экран и т.д.) целесообразно оформлять как процедуру. Общая структура функции совпадает со структурой процедуры за исключением заголовка. В отличие от процедуры имя функции связывается с ее значением поэтому имя вычисляемой переменной должно совпадать с именем функции.

Описание в программе.

Function имя функции (список формальных параметров): тип возвращаемого результата;

Пример:

Ввести 2 числа вычислить сумму этих чисел.

Var a, b, c: integer;

Function summa (c,d: integer): integer;

Begin

summa:= c+d;

End;

Begin

Writeln(‘Введите два числа’);

Realn(a,b);

S:=summa(a,b);

Writeln(‘Сумма чисел = ’, S);

End.

Вызов функции в операторах вывода обрабатывается формально точно также как и упоминание о константах и переменных.

Writeln(‘Сумма чисел = ’, summa(a,b));