Процедурный тип

Type

<имя типа>=Function(<формальные параметры>):<тип функции>;

<имя типа>=Procedure(<формальные параметры>);

ПРИМЕР

Параметры – процедуры Параметры - функции

Создать процедурный тип

При описании подпрограммы процедурного типа использовать режим дальней адресации

В формальных параметрах подпрограммы указать переменную процедурного типа

Режим дальней адресации

Удобнее, если несколько функций

Удобнее, если одна функция

Параметры – процедуры Параметры - функции

Создать процедурный тип

При описании подпрограммы процедурного типа использовать режим дальней адресации

В формальных параметрах подпрограммы указать переменную процедурного типа

Пример программы

Пример программы

Рекурсия

Косвенная рекурсия Опережающее описание

Рекурсивное вычисление факториала

Тривиальное решение

Рекурсивная формула

Рекурсия по ошибке