Реферат: Модули и объекты в языке Турбо Паскаль 7.0

cosh := 0.5*(t + 1.0/t);

end;

function tanh(x: Float): Float;

begin

t := Exp(2.0*x);

tanh := (t – 1.0) / (t + 1.0);

end;

end.

Зарезервированные слова interface и implementation здесь играют важную роль. Каждый модуль имеет части (секции), озаглавленные этими словами. Секция interface (она называется интерфейсной секцией) содержит описания констант, типов, переменных и процедур, доступных из вызывающей программы или модуля. Секция implementation (секция реализации) содержит исходный код программы. Она может также содержать локальные описания, такие как var t: Real; из нашего примера.

Каждый модуль начинается с зарезервированного слова unit и заканчивается словом end, за котором следует точка. Для этого end не требуется соответствующего слова begin, хотя можно и поставить его непосредственно перед end. Оператор type в начале нашего модуля определяет тип Float, который в данном случае эквивалентен типу Extended. Указав, справа от знака равенства любой другой эквивалентный тип, можно изменить точность вычисления гиперболических функций.

1. 1 Структура модулей

Модуль имеет следующую структуру:

Unit module_name

Interface

Интерфейсная секция

Implementation

Секция реализации

Секция инициализации

Рис. 1. Структура модуля

Здесь Unit - зарезервированное слово (единица), начинает заголовок модуля; name - имя модуля (правильный идентификатор). Interface – интерфейсная секция – содержит те описания типов, переменных и других объектов данных, которые можно использовать в других программах или модулях. Секция реализации начинается с зарезервированного слова implementation . Все описания, содержащиеся в секции реализации, являются локальными, их область действия – данный модуль. Здесь же содержаться полные описания функций и процедур модуля. Последняя часть модуля – секция инициализации . Она может быть пустой и содержать только зарезервированное слово end или включать в себя исполняемые операторы, выполняющие необходимые действия по инициализации (например, по присваиванию начальных значений переменным) модуля.

В качестве примера рассмотрим модуль func1 /см. приложение А/, расширяющий вычислительные возможности Турбо Паскаля, так как он содержит функции, отсутствующие в стандартных модулях системы. Среди «стандартных» функций – синус (Sin), косинус (Cos), арктангенс (ArcTan), экспонента (Exp), натуральный логарифм (Ln), квадрат числа (Sqr) и квадратный корень из него (Sqrt). В модуле func1 имеются тангенс (Tan), арксинус (ArcSin) и арккосинус (ArcCos), функции перевода градусной меры в радианную и наоборот (Degrees_to_Radians, Radians_to_Degrees), набор гиперболических функций (Sinh, Cosh, Tanh), а также десятичный логарифм (Log10) и произвольная степень числа (Power).

Напомню математическое определение гиперболических функций:

В нашем примере интерфейсная секция содержит описания вещественного типа float, а также константу Infinity – «бесконечно большое значение». Бесконечность здесь понимается, разумеется, в смысл машинной арифметики, как значение, близкое к максимально допустимому для типа Extended. Далее следуют заголовки функций модуля.

Секция реализации содержит константы, используемые в подпрограммах-функциях. Затем идут полные описания функций. Вычисление тангенса использует «классическое» определение этой функции как отношение синуса к косинусу. Учтено также приближение значения тангенса к бесконечности при определенных значениях аргумента. В этом случае функция возвращает «машинную бесконечность».

При программировании арксинуса и арккосинуса следует учитывать то, что эти функции – многозначные. В нашем случае вычисляется «главное значение», лежащее в интервале [-p/2, p/2] (для арксинуса) или [0, p] (для арккосинуса) радиан. Для этого используются формулы, известные из курса элементарной математики.

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

1.2 Заголовок модуля и связь модулей друг с другом

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

Unit Global;

то исходный текст соответствующего модуля должен размещаться в дисковом файле GLOBAL.PAS. Имя модуля служит для его связи с другими модулями и основной программой. Эта связь устанавливается специальным предложением