Модули

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

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

Рассмотрим в качестве примера модуль вычисляющий x^y.

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

Unit step;

Interface

Function astepn (x,y: word): word;

Implementation

Function astepn (x,y: word): word;

Var

i,s: word;

Begin

s:=1;

for i:=1 to y do

s:=s*x;

astepn:=s;

End;

End.

Рассмотрим подробнее эту программу: любой модуль начинается с зарезервированного слова unit, за которым следует имя модуля (это имя также должно быть именем и файла). Результатом компиляции модуля step.pas с заголовком unit step будет файл step.tpu.

Каждый модуль имеет две секции. Секция interface (интерфейс) содержит описания констант, типов, переменных и процедур, доступных из вызывающей программы или модуля. Секция implementation (реализация) содержит исходный код программы.

Модуль заканчивается словом end., причем для этого слова не обязательно открывать begin, хотя открытие не вызовет ошибки.

Рассмотрим использование это модуля:

Uses crt, step;

Begin

Writeln (astepn(2,6));

End.

Результат: 64