Процедурные типы, параметры и переменные |
Процедурные типы, параметры и переменные |
volvo |
24.12.2004 23:31
Сообщение
#1
|
Гость |
Процедурные типы и переменные
Отличительной особенностью Турбо Паскаля является разрешение передавать в процедуры и функции имена других подпрограмм, оформляя их как параметры. И точно так же, как передается значение, может передаваться некая функция его обработки. Особенно важным это становится при программной реализации алгоритмов вычислительной математики. Например, становится возможным написать функцию интегрирования любой функции вида f(t) по схеме: function Integral(LowerLimit, UpperLimit: Real; Характерно, что синтаксис записи процедурного типа в точности совпадает с записью заголовка процедуры или функции, только опускается идентификатор после ключевого слова procedure или function. Приведем некоторые примеры описаний процедурного типа (Turbo/Borland Pascal не позволяет описывать функции, которые возвращают значения процедурного типа. Результат функции должен быть строкового, вещественного, целого, символьного, булевского типа, указателем или иметь перечислимый тип, определенный пользователем): type Как видно из приведенных примеров, существует два процедурных типа: тип-процедура и тип-функция. Имена параметров в описании процедурного типа играют чисто декоративную роль - на смысл описания они не влияют. Необходимыми являются только идентификаторы типов параметров и результатов (для функций). В приведенном выше каркасе примера интегрирования есть одноместная функция F(t) возвращающая вещественное значение. Класс таких функций может описываться так: type FuncType = function(t: Real): Real; Тип, к которому могла бы принадлежать сама функция Integral, должен был бы выглядеть примерно так: type После объявления процедурного (или функционального) типа его можно использовать в описаниях параметров подпрограмм. И, конечно, необходимо написать те реальные процедуры и функции, которые будут передаваться как параметры. Требование к ним одно: они должны компилироваться в режиме {$F+}. Поскольку по умолчанию принят режим {$F-}, такие процедуры обрамляются парой соответствующих директив. Пример функции, которая принадлежит введенному выше типу FuncType: {$F+} аналогичное описание с использованием директивы компилятора Far: function SinExp(tt: Real): Real; far; Такая функция уже может быть подставлена в вызов функции численного интегрирования: var x: Real; И мы получим в переменной X значение интеграла в пределах [0, 1]. Но не всякую функцию процедуру можно подставить в такой вызов. Существуют определенные правила. Правила корректной работы с процедурными типами
|
Текстовая версия | 28.04.2024 7:44 |