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

Параметры в процедурах.

Пример программы с использованием локальной переменной

Пример программы с использованием глобальной переменной

Необходимо отметить следующиемоменты:

1.Неременные, описанные в разделе описания переменных всей прог­раммы, "видны" всем процедурам программы, т.е. являются "глобальными". Например, процедура Vivod использует переменную I, причем I описана в разделе описания переменных программы.

2. Если при описании переменных процедуры мы вводим переменную с тем же именем, что и некоторая глобальная переменная, то внутри процедуры переменная процедуры перекрывает глобальную перемен­ную (таким образом, глобальная переменная становится "невидимой" ). Если не иметь в виду последнее замечание, то трудно понять, почему вторая программа выводит на экран какие-то ха­отические записи.

{в этой программе используется процедура Stars, выводящая на экран сто звездочек}

program Stars_200;

{описание процедуры Stars}

procedure Stars;

var i: Integer;

begin

for i:=1 to 100 do

WriteLn ('*');

end;

{описание процедуры заканчивается "точкой с запятой" }

{сама программа}

begin

Stars; { первый раз вызвали процедуру Stars }

WriteLn (‘100 stars');

Stars; {второй раз вызвали процедуру Stars }

WriteLn (‘ 200 stars!');

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

Пример. Написать процедуру сложения двух вещественных чисел. Нахождение суммы оформить процедурой.

На языке программирования это будет выглядеть следующим образом:

Program _;

Uses crt;

Var a,b,c: real;

Procedure sum (x,y: real; var z: real);

Begin

Z:=x+y;

End;

{основная программа}

Begin

Writeln (‘Введите два числа’);

Read (a,b);

Sum (a,b,c);

Writeln (‘сумма двух чисел=’,c);

End.

Для того, чтобы процедура могла работать с параметрами, при ее описании в заголовке процедуры поочередно перечисляются парамет­ры и их тип:

Procedure sum (x,y: real; var z: real);

После того, как процедура была описана, она может быть вызвана. При каждом вызове процедуры sumсоздаются переменные x, y,z.