Implementation

USES <список подключаемых модулей>;

TYPE <описание типов, определенных в данном модуле

и недоступных для других модулей >;

CONST <описание констант, определенных в данном

модуле и недоступных для других модулей >;

VAR <описание переменных, определенных в данном

модуле и недоступных для других модулей >;

PROCEDURE <реализация процедур, определенных в

данном модуле и доступных для других модулей >;

FUNCTION < реализация функций, определенных в данном

модуле и доступных для других модулей >;

PROCEDURE < заголовки и реализация процедур,

определенных в данном модуле и недоступных для

других модулей >;

FUNCTION <заголовки и реализация функций,

определенных в данном модуле и недоступных для

других модулей >;

BEGIN <это слово необходимо, если имеются операторы

секции инициализации>

<Необязательная часть модуля>

END.

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

Рассмотрим пример. Требуется написать главную программу, в которой вводится размер вектора и его элементы и вызывается процедура сортировки одномерного массива целых чисел в порядке возрастания. Длина массива не превышает 100. Процедуру оформить в виде модуля.