Procedure Zagolovok;
Begin
WriteLn(‘Группа ИС-09’);
WriteLn(‘Студент Иванов Иван’);
End;
В отличие от функций, использующих в качестве аргументов только параметры-значения, не изменяющиеся после выхода их функции, процедуры в качестве выходных (вычисляемых) параметров используют параметры-переменные. Любые операции над формальными параметрами-переменными внутри процедуры выполняются и над соответствующими фактическими параметрами-переменными. Поэтому формальному параметру-переменной должна соответствовать фактическая переменная, а не константа или выражение. В заголовке процедуры выходные параметры-переменные перечисляются в скобках после слова Var с указанием своего типа, причем для каждого нового типа это слово должно повторяться.
В остальном структура процедуры не отличается от структуры программы на Паскале и может включать в себя следующие разделы:
· описания меток Label
· определения констант Const
· определения типов Type
· описания переменных Var
· описания процедур и функций Function, Procedure
· операторов процедуры Begin … End;
Переменные, описанные в разделе Var процедуры или указанные в ее заголовке, считаются локальными, все остальные – глобальными. Локальные переменные существуют только в процедуре, в которой они описаны, и после выхода из процедуры исчезают.
Пример: описать процедуру, обменивающую значениями две переменных целого типа:
Procedure Swap(x, y: Integer);x и y – входные параметры-значения
Var temp: Integer; temp – локальная переменная
Begin
temp := x; реализация алгоритма
x := y; циклического обмена
y := temp;
End;
Эта процедура ничего не делает: в списке формальных параметров указаны параметры-значения. Правильное описание с использованием параметров-переменных:
Procedure Swap(Var x, y: Integer);x и y – входные параметры-
Var temp: Integer; переменные
Begin
temp := x;
x := y;
y := temp;
End;
Обращение к процедуре в вызывающей программе производится по ее имени, за которым в скобках перечисляются фактические параметры, соответствующие формальным параметрам процедуры по количеству, типам и порядку следования:
Дата добавления: 2015-08-08; просмотров: 470;