Функция – это подпрограмма, результатом выполнения которой является одно единственное значение. Это значение присваивается имени функции. Таким образом, функция не требует введения формальных параметров, играющих роль результата, так как эту роль играет имя самой функции.
Функция состоит из заголовка и блока:
Заголовок функции:
Function Xxx(P1:T1;P2:T2;…Pn:Tm):Q;
Xxx - имя функции (любой идентификатор);
P1,P2,…,Pn - формальные параметры;
T1,T2,…,Tm – типы формальных параметров;
Q – тип значений, которые способна принимать функция в результате ее выполнения;
Особенности раздела операторов функции:
Раздел операторов функции должен содержать оператор присваивания, в котором слева помещено имя функции.
Обращение к функции:
Обращение к функции не является оператором, оно входит в состав выражения (например, в правой части оператора присваивания).
Z:=Xxx[(B1,B2,…,Bn)];
Задача.
Составить программу вычисления максимального из 4-х чисел, используя функцию вычисления максимального из 2-х чисел.
Program func1;
Var A,B,C,D,M1,M2,M3:Integer;
Function Max(X,Y:Integer):Integer;
Begin
If X>Y Then Max:=X Else Max:=Y;
End;
Begin
Readln(A,B,C,B);
m1:=Max(A,B);
m2:=Max(C,D);
m3:=Max(M1,M2);
Writeln(’Max=’,M3);
End.
Задачи:
Из параграфа 9.4 решить задачи №№ 2,3,4,5, используя обращение к функции.
