Процедури користувача

Являють собою поіменовану групу операторів, що реалізують деяку частину загальної задачі. Ця поіменована група викликається за іменем з довільного місця розділу оператарів. Опис процедури включає заголовок та тіло процедури. Формат опису:

PROCEDURE <iм'я> (формальні парамутри);

<роздiли описiв>;

Begin

<роздiл операторiв>;

End;

Тут формальнi параметри – це список формальних параметрiв з вказанням їх типiв, роздiлених комами.

Приклад:

Procedure Sort (A: integer; B: real);

Var c, d: Real;

Begin

...

End;

Для звертання до процедури використовується оператор виклику, який складається з iменi процедури та списку фактичних параметрiв в круглих дужках. Список параметрiв, як формальних так i фактичних може бути вiдсутнiм, якщо до процедури не передається нiяких значень, як, наприклад, в процедурi очистки екрану ClrScr.

Елементами списку фактичних параметрiв можуть бути константи, змiннi та вирази. Кiлькiсть та тип формальних параметрiв повинен вiдповiдати кiлькостi та типовi фактичних параметрiв.

Приклад виклику процедури: Sort (1, 2.5); Sort (C, D);

Приклад процедури: розглянемо процедуру, яка дозволяє очистити деяку область екрану, починаючи із стовпця x та рядка y.

Procedure Delpst(x, y: Real);

Begin

GoToXY(x,y); { встановлення курсора в x позицію y рядка }

ClrEol; { затирає всі символи в рядку, починаючи з біжучої позіції курсора }

End;