IPB

> procedure (зарезервированное слово)
Чат
Форум
Загрузка...
 

Язык:
Русский
English


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

Синтаксис

   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;

Ада

 -- Объявление процедуры
 -- GetPenPos и MoveToGlobal -- из пакета UserIO (TextTools)
 procedure Wr_Str (X, Y : Integer; S : String) is
    Save_X, Save_Y : Integer;
 begin
    GetPenPos (Save_X, Save_Y);
    MoveToGlobal (X, Y);
    Draw (S);
    MoveToGlobal (SaveX, SaveY);
 end Wr_Str;

В зависимости от того, последует за заголовком тело или нет, после заголовка пишется "is" или точка с запятой. Поэтому в языке Ада директива forward не нужна. Вместо директивы external в языке Ада используется pragma Import. Директива far специфична для DOS. Вместо inline есть полноценные ассемблерные шаблоны. Вместо interrupt используется pragma Interrupt_Handler.

См. также

 
 К началу страницы 
Тэги: procedure
 

Код для вставки: :: :: :: ГОСТ ::
Поделиться: //
 



-
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"