Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лекции по программированию..pdf
Скачиваний:
10
Добавлен:
15.11.2022
Размер:
12.2 Mб
Скачать

Лекция 16

16.1. Организация внешних подпрограмм

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

ВТУрбо-Паскале это ограничение преодолевается за счет, вопервых, введения внешних подпрограмм, во-вторых, разработки и ис­ пользования модулей.

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

Проиллюстрируем этот прием на примере задачи целочисленной арифметики. Условие задачи: дано натуральное число п. Найти сумму первой и последней цифр этого числа.

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

Function Digits(N Longlnt) Byte;

Var Kol Byte;

Begin

Kol :« 0;

While N O 0 Do

Begin

Kol :» Kol + 1;

N :» N Div 10

End;

Digits :* Kol

End;

Сохраним этот текст в файле с расширением . in с (это расширение внешних подпрограмм в ТУрбо-Паскале), например d ig its .in c .