Модули

работать н ад программой ,
можно разбить программу на части. Такое

разбиение программы
называется построением ее по модульному принципу. При этом
можно выделить три ступени:
- разбиение на модули исходной программы;
- разбиение на модули программы в объектных кодах ;
- раздельная трансляция модулей исходной программы .

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

( * of р *)
end.
Интерфейсная часть описывает константы, типы, переменные,

процедуры и функции " общего пользования , к которым с помощью uses имя_модуля могут обращаться другие программы или модули .

Вызывающая программа может использовать эти модули, обратившись к ним с помощью uses имя_модуля, также, как если бы они были описаны в самой программе. Все вызванные величины являются для вызывающей программы глобальными. В интерфейсной части стоят лишь заголовки процедур и функций.

Наряду с этим здесь могут описываться константы, типы, переменные, процедуры и функции, которые не общедоступны, а используются модулем " приватно

Result: Longint;

begin
Result:=1; {0!=1}
for i:= 1 to

n do Result:= Result*i;
f:= Result;
end;
end.{конец модуля}

{ОСНОВНАЯ ПРОГРАММА}

Program fact;
Uses MyUnit; {подключение модуля вычисления факториала MyUnit }
Var m:integer;

Begin
Writeln (‘Введите m’);
Readln(m);
Writeln (‘m!+(m2)! = ’, f(m)+f(m*m):2:2 );
End.

При компиляции модуля на Паскале автоматически создается модуль с расширением имя модуля.TPU

Пример. Описать модуль, содержащий функцию вычисления n! и программу, вычисляющую m!+(m2)!