Procedure

Процедура - это часть программы, в которой выполняется специфическое действие, обычно основанное на наборе параметров.

Замечания

В заголовке процедуры определяются ее идентификатор и набор формальных параметров (если таковые есть). Процедура вызывается с помощью процедурного оператора. Заголовок процедуры сопровождается:

  • разделом описаний, в котором объявляются локальные объекты
  • операторами, находящимися между Begin и End, которые определяют, что должно быть выполнено при вызове процедуры.

Вы можете использовать директиву Interrupt, чтобы объявить процедуру обработки прерываний. Вместо частей объявлений и операторов, в объявлении процедуры могут присутствовать директивы Forward, external или InLine.

Синтаксис

Procedure идентификатор;
  или
Procedure идентификатор (параметры);

Примеры
{ Объявление процедуры }
 
Procedure WrStr (X, Y : Integer; S : String);
Var SaveX, SaveY : Integer;
Begin
 SaveX:=WhereX;
 SaveY:=WhereY;
 GotoXY(X, Y);
 Write(S);
 GotoXY(SaveX, SaveY);
End;