Формальные и фактические параметры

Функции, параметры, описанные в заголовке при объявление подпрограмм, считывается формальными, а те параметры, которые подставляются на их место при вызове функций, подпрограмм, называется фактическими. При вызове подпрограмм необходимо полное соответствие фактических параметров формальных по типу и порядку следования.

Пример.

Процедуры подсчета суммы элементов,определение в массивах А и В. Процедуры вывода массива и суммы.

Type

Massiv_1=array[1..5] of byte;

Const

A:massiv_1 = (1,2,3,4,5);

B:massiv_1 = (5,6,7,8,9);

Var

Sum:word;

I:byte;

Procedure Out_mas (p0:massiv-1);

Var

I:byte;

Begin

For i:=1to 5 do

Write (p0[i]:4);

Writeln;

Writeln(‘Сумма ’, sum:4);

End;

Procedure sum_mas (p1:massiv_1; pi:boolean);

Var

I:byte;

Begin

Sum:=0;

For i:=1to 5 do

Если в процедуре убрать var i:byte; то {5}, так как в процедуре перемещает бы глобальную переменную и цикл прошел, а в глобальную переменную запишется 5

Sum:=sum +p[i];

If p2 =true then

Out_mas(p1);

End;

Begin

I:=20;

Sum_mas (a, true);

Sum_mas(b, false);

Write(i); {20}

End.