Параметры, которые передаются в подпрограмму при ее вызове, называются фактическими.
Вызов процедуры для выполнения осуществляется по ее имени, за которым в круглых скобках следует список фактических параметров, т.е. передаваемых в процедуру данных:
<имя процедуры> ( <список фактических параметров> ); |
Рассмотрим пример.
Var A, G: Double; procedure Average(const X, Y: Double; out M, P: Double);begin M := (X + Y) / 2; P := Sqrt(X * Y);end; procedure TForm1.Button1Click(Sender:Tobject);begin Average(10, 20, A, G); ShowMessage('Среднее арифметическое = ', FloatToStr(A)); ShowMessage('Среднее геометрическое = ', FloatToStr(G));End; end. |
При вызове подпрограмм необходимо помнить следующее:
1. Выражения, используемые для передачи в типизированные параметры-константы и в параметры-значения должны быть совместимыми по присваиванию с соответствующими формальными параметрами.
2. Выражения, используемые для передачи в параметры-переменные и в выходные параметры должны быть одинаковых с соответствующими формальными параметрами типов, исключая непизированные параметры.
3. На место параметров, передаваемых по ссылке можно подставлять только переменные, нельзя – числа и константы.
4. Если список формальных параметров отсутствует, то список фактических параметров (в том числе круглые скобки) не указывается.
5. Если вызывается подпрограмма с параметрами по умолчанию, то все фактические параметры по умолчанию, идущие перед тем параметром, который необходимо передать значение, отличное от умолчания, должны быть заполнены. Например, SomeFunction(,,X) – некорректен.