Вызов процедуры

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

Объявление

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

Замечания

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

Процедура вызывается с помощью процедурного оператора.

Заголовок процедуры сопровождается:

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

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

Пример

 { Объявление процедуры }
 
 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;

См. также  Константы процедурного типа.