1. Характеристика подпрограмм в Turbo Pascal

Иногда при программировании необходимо многократно повторять некоторую последовательность вычислительных действий, заданных блоком выражений.

Чтобы каждый раз не повторять в программе этот блок выражений Паскаль позволяет представить эту последовательность вычислительных действий в форме подпрограммы, а затем по имени подпрограммы вызывать выполнение кода подпрограммы в заданном месте основной программы. Фактически подпрограмма – это мини-программа, которая перед использованием должна быть предварительно объявляться (описываться).

Процедура объявляется в разделе описаний

• основной программы (вышестоящей подпрограммы);

• модуля (будет рассмотрено в следующей лекции).

Структура подпрограммы полностью аналогична структуре основной программы, за исключением того, что заголовок в подпрограмме является обязательным, т.е. любая подпрограмма имеет заголовок, раздел описания и тело подпрограммы:

<Заголовок подпрограммы>;

<[раздел описаний подпрограммы]>;

<Тело подпрограммы>);

В отличие от основной программы заголовок в подпрограмме является обязательным. Кроме того, любая подпрограмма может использовать в своем теле (теле подпрограммы) не только переменные, описанные в своем разделе описаний, но и переменные, описанные в основной программе. То есть все переменные, используемые подпрограммой, можно представить:

• локальными переменными – переменными, объявленными (описанными) в подпрограмме:

• глобальными переменными – переменными, объявленными в разделе описания основной программы.

Глобальные переменные могут использоваться двумя способами. Во-первых, непосредственно включая имена переменных в выражения подпрограммы. А, во-вторых, посредством передачи глобальных переменных в тело подпрограммы через механизм формальных параметров. Механизм формальных параметров будет рассмотрен в конце текущей лекции.

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

В Турбо Паскаль реализованы две разновидности подпрограмм:

• процедуры;

• функции;

2. Порядок создания и использования процедур

Процедура предназначена для выполнения какой-то законченной последовательности действий. Любая процедура перед ее использованием должна быть предварительно описана (объявлена).

Объявление процедуры. Любая процедура начинается с заголовка. Он состоит из зарезервированного слова Procedure, за которым следует идентификатор имени процедуры, а далее в круглых скобках – список формальных параметров. За заголовком могут идти такие же разделы, что и в основной программе. В отличие от основной программы процедура завершается не точкой, а точкой с запятой.

Таким образом, при объявлении процедуры ее необходимо описать следующей структурой:

Procedure <идентификатор имени> ([список формальных параметров]);

<[раздел описаний процедуры]>;

<Тело процедуры>).

Использование процедуры. Для использования уже объявленной процедуры достаточно в том месте основной программы, где нужно выполнить процедуру, указать ее имя со списком фактических параметров:

<заголовок процедуры> ([список фактических параметров]);.

Фактические параметры должны совпадать по количеству, порядку следования и типу с формальными параметрами процедуры

Пример В основной программе объявлен

тип

Type TСomplex = Record Re, Im: Real; End;

и переменные

Var Compl1, Compl2, Compl3: TСomplex;

X,Y,Z: Real

Затем объявлена процедура:

Procedure InPut_Complex ( Var comp1: TComplex);

Const S1=’Введите действительную часть числа’;

S2=’Введите мнимую часть числа’;

Begin Write (S1); Readln (Comp1.Re);

Write (S2); Readln (Comp1.Im);

End;

Для использования процедуры в теле основной программы используют следующую форму:

InPut_Complex (Compl1);

InPut_Complex (Compl2);.