Использование модулей в Турбо Паскаль
Параметры-процедуры и параметры-функции
Передаваемым параметром может быть также параметр-процедура или параметр-функция, т. е. параметр процедурного типа. Фактически этот параметр является параметром-значением, т. к. записывается без зарезервированного слова var.
В качестве фактического параметра в этом случае используется соответствующая процедура или функция, имеющая необходимое количество параметров требуемых типов.
Для параметров-процедур и параметров-функций существуют те же правила, что и для других переменных процедурного типа: подпрограммы должны компилироваться с ключом {$F+} или иметь директиву far, не должны быть стандартными подпрограммами, не должны объявляться внутри других подпрограмм, не иметь директив inline или interrupt.
Пример. Программа, печатающая таблицы сложения и умножения двух целых чисел в заданном диапазоне.
program EXAMPLE15;
type
Func = functionCX, Y: Integer): Integer;
{$F+}
function Add(X, Y: Integer): Integer;
begin
Add := X + Y
end;
function Multiply (X, Y: Integer): Integer;
begin
Multiply := X * Y
end;
{$F-}
procedure PrintTable(A, B: Integer; Operation: Func);
{процедура печати таблицы}
var
i, j: Integer;
begin
for i := 1 to A do
begin
for j := 1 to В do
Write(0peration(i, j): 5);
WriteLn
end;
WriteLn
end;
begin {начало основной программы}
PrintTable(10, 10, Add);
PrintTable(10, 10, Multiply)
end.
Понятие модуля или, в более общем случае, модульного программирования, возникло на определенном этапе развития вычислительного дела и было обусловлено, в первую очередь, возрастающими объемами программ, их увеличивающейся внутренней сложностью и коллективным характером разработок. К настоящему времени понятие модуля проделало значительную эволюцию от примитивного "разрубания" текста программы на произвольные части или создания библиотек включаемых фрагментов до независимо хранимых и разрабатываемых, независимо компилируемых и тестируемых программных единиц со строго определенными интерфейсами, которые могут объединяться в различных сочетаниях.
При всех несомненных достоинствах алголоподобных языков, большинство из них имеет существенный недостаток - отсутствие модульности. Представление программной системы как единой языковой конструкции является препятствием для эффективной организации коллективных разработок сложных систем, затрудняет понимание и модификацию программ. Понятие подпрограмм лишь частично решает проблему ввиду неявных и слабо контролируемых информационных зависимостей подпрограмм и их окружения.
С этой точки зрения, введение понятия модуля в Turbo Pascal, явилось решающим шагом на пути его превращения в язык, пригодный для крупных разработок производственного и коммерческого назначения на современном уровне технологии программирования. Стал возможным современный стиль реализации программных пакетов различного назначения и ориентации, легко подключаемых к любой программе. Кроме того, за счет введения модулей удалось ослабить ограничения на суммарный объем готовых программ.
Модульные средства в Turbo Pascal'e заметно слабее аналогичных возможностей тех языков, для которых модульный принцип был положен в основу их проектирования. Однако следует признать, что разработчики языка Turbo Pascal нашли удачный компромисс, достаточно органично встроив принципиально новое понятие в считающийся уже классическим язык Pascal, не нарушив при этом его целостности, элегантности и простоты и одновременно значительно расширив его возможности.
В Турбо Паскаль модульное программирование является дальнейшим развитием стратегии структурирования программы, начало которому положило использование подпрограмм (процедур и функций).
Реализация технологии модульного программирования предполагает, что процедуры и функции из раздела описания основной программы переносятся в отдельный файл, создаваемый по определенным правилам и называемый модулем.
В результате появляется возможность однажды разработанные процедуры и функции использовать многократно, причем не только одной программой, в которой написан код подпрограммы, а несколькими программами. Кроме того, наличие модулей в Turbo Pascal позволяет программировать и отлаживать программу по частям, создавать библиотеки подпрограмм и данных, использовать возможности стандартных модулей и модулей, созданных пользователем, практически неограниченно увеличивать кодовую (содержащую коды команд) часть программы.
Стандартные процедуры и функции Турбо Паскаль размещаются в модулях, входящих в комплект поставки компилятора Турбо Паскаль. Эти модули будут кратко рассмотрены во втором вопросе.
Вместе с тем, разработчики Турбо Паскаль позаботились о том, чтобы пользователи могли самостоятельно создавать свои собственные модули, содержащие новые данные (константы, типы, переменные) и новые подпрограммы (процедуры и функции). Структура модуля и правила его создания и использования будут рассмотрены в третьем вопросе лекции.