| Пример заголовка процедуры | Пример вызова | |
| По значению:в процедуру передается значение параметра. | Procedure ABC (arg:integer); | ABC(10);ABC(X+3); |
| По ссылке CONST:В процедуру передается ссылка на константу или переменную, содержащую данные. | Procedure ABC (const arg:integer); | ABC(10);ABC(X); |
| По ссылке VAR:В процедуру передается ссылка на переменную, содержащую данные. | Procedure ABC (var arg:integer); | ABC(X) |
Опытного программиста отличает умение эффективно передавать данные; табл. 5 поможет вам выбрать наиболее удачный способ такой передачи.
Табл. 5 – Рекомендуемые способы передачи данных
| Куда передавать данные | Рекомендуемый способ |
| Только в процедуру или функцию | 1) По значению (простые типы) 2) По ссылке CONST (сложные типы) |
| Только из процедуры и функции | 1) Через имя функции (одно значение) 2) По ссылке VAR (несколько значений) |
| В обоих направлениях | По ссылке VAR (любые данные) |
В каждом случае предпочтительный способ указан первым. Данные простых типов лучше передавать внутрь подпрограмм по значению. По ссылке CONST передают строки и другие сложные типы данных (скоро мы изучим их). Через имя функции возвращают лишь один результат. А если надо вернуть несколько результатов, или вернуть сложный тип данных, используют ссылки VAR.
Программа, сработанная профессионалом, состоит почти из одних только процедур и функций, разработка которых отнимает львиную долю времени. Но не всегда программисты пишут их сами. В Паскале запасено немало готовых подпрограмм – это встроенные в язык и в библиотеки процедуры и функции. С ними можно ознакомиться в руководстве по языку и во встроенной справке. Некоторые из них вам известны, и применялись нами.
Напоследок напомню об основных средствах обработки текстовых файлов.
Для чтения из файлов применяют следующие процедуры и функции:
Assign(F, ...) - Связать файловую переменную с файлом
Reset(F) - Открыть файл для чтения
Read(F, ...) - Прочитать часть строки файла
Readln(F, ...) - Прочитать строку файла и перейти к следующей
Eoln(F) - Проверить на конец строки
Eof(F) - Проверить на конец файла
Close(F) - Закрыть файл
