Описание функции и обращение к ней

Описание функции, также как и описание процедуры, состоит из двух частей: заголовка функции и тела функции. Телом функции является блок. То есть тело функции имеет точно такую же структуру, что и программа: в нем могут присутствовать все разделы. Заголовок функции начинается со слова FUNCTION, за которым следует имя функции и за ним в круглых скобках список формальных параметров. Функция вычисляет единственное значение простого типа. Тип этого значения указывается после двоеточия за списком формальных параметров. Заголовок функции отделяется от ее тела точкой с запятой.

Рассмотрим пример описания функции:

FUNCTION A(X:T1;Y,Z:T2;VAR B,C,D:T3):T;

<тело функции A>;

здесь A - имя функции; X - формальный параметр-значение типа T1; Y,Z- формальные параметры-значения типа T2; B,C,D - формальные параметры-переменные типа T3; T - тип значения функции.

Все сказанное ранее о процедурах, их параметрах, обращении к ним, справедливо и для функций. Вместе с тем имеются и отличия:

1) описание начинается со служебного слова FUNCTION;

2) в заголовке функции указывается имя типа значения описываемой функции;

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

Пример 1.1. Описать функцию, вычисляющую максимум двух чисел.

FUNCTION MAX(X,Y:REAL):REAL

BEGIN

IF X>Y THEN MAX:=X ELSE MAX:=Y

END;

Эту функцию в программе можно применять в следующих видах:

Z:=MAX(X,Y);

A:=MAX(0.5,SIN(1));

WRITE('МАКСИМУМ=',MAX(C,D));