Пример 1.8

Объявление функции. Функция Simvol определяет наличие искомого символа в анализируемой строке.

Function Simvol (Const S: String; C: Char): Boolean;

Var

I: 1 .. 255;

Begin

For I:= 1 To Length (S) Do

If S[I] = C Then

Begin

Simvol:= True; {Возвращаемое значение}

Exit;

End;

Simvol:= False; {Возвращаемое значение}

End;

Данная функция посимвольно анализирует значение строки, поступающей на вход ее формального параметра S. Если очередной символ строки равен искомому символу, поступающему на вход формального параметра С, то возвращаемое значение функции устанавливается в True. Если среди всех символов строки нет искомого символа, возвращаемое значение функции устанавливается в False.

1.3.2. Вызов функции

Для обращения к функции в вызывающей программе используется вызов функции.

Вызов функции – это имя функции, за которым следует взятый в круглые скобки список фактических параметров:

<Вызов_функции> [(Список_фактических_параметров)].

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

Например, для примера 1.8 вызов функции в вызывающей программе может быть записан следующим образом:

Simvol (X, Y),

где фактический параметр X должен иметь тип String, а фактический параметр Y – тип Char.

Поскольку функция задает правило вычисления возвращаемого значения, то вызов функции представляет собой данное значение. Это значение используется обычно в качестве операнда какой-либо операции. Таким образом, вызов функции может быть записан везде, где по синтаксису допускается использование выражений (например, в правой части оператора присваивания).

Применительно к примеру 1.8 вызов функции в вызывающей программе может быть использован, например, так:

Z:= Simvol (X, Y) Or Simvol (A, B);

Здесь в выражении используется два вызова функции Simvol. При его вычислении в точки вызова передаются возвращаемые значения функции. Далее данные значения участвуют в вычислении выражения.