Материал: Мансуров. Основы программирования в среде Lazarus. 2010

3.1 Общая структура Паскаль – программы

____________________________________________________________________

и позволяет передать управление оператору с меткой <Метка>.

Программа, содержащая метки обычно плохо читается и, как правило, яв-

ляется не структурированной. Вполне можно писать программы вообще не ис-

пользуя метки. Итак, забыли про метки и поехали дальше!

3.1.1 Процедуры и функции

При разработке больших программ почти всегда появляются часто повто-

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

Подпрограммы делятся на процедуры и функции. Текст процедуры или функции записывается в разделе описаний, после описания переменных. В

дальнейшем для того, чтобы использовать эту процедуру или функцию доста-

точно указать ее имя. В некоторых случаях процедура (функция) использует некоторые значения, которые должны передаваться из главной программы или из других процедур (функций). Эти значения называются параметрами. Пара-

метры указываются в заголовке процедуры (функции) в скобках. Указывается имя переменной и через двоеточие тип переменной. Если переменных одного типа несколько, то они разделяются запятыми. Параметры разных типов разде-

ляются точкой с запятой.

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

3.1.1.1 Структура процедуры

procedure <имя процедуры>[(параметры)];

label

< Метки >;

142

Глава 3 Более сложные элементы языка

____________________________________________________________________

const

< Константы >; type

< Новые типы данных >; var

<Описание локальных переменных >;

<Описание внутренних процедур >;

<Описание внутренних функций >;

begin

< Тело процедуры >; end;

Параметры, указанные в заголовке называются формальными параметра-

ми. Для вызова процедуры необходимо просто указать ее имя и параметры (ес-

ли они имеются). Параметры, указанные при вызове процедуры называются фактическими параметрами.

3.1.1.2. Структура функции

function <имя функции>[(параметры)]:тип функции; label

<Метки >; const

<Константы >;

type

<Новые типы данных >;

var

<Описание локальных переменных >;

<Описание внутренних процедур >;

<Описание внутренних функций >;

143

3.1 Общая структура Паскаль – программы

____________________________________________________________________

begin

< Тело функции >;

end;

В заголовке функции указывается ее имя, параметры (если они есть) и тип значения, которую функция должна возвратить. Для вызова функции необхо-

димо указать ее имя и фактические параметры (при их наличии). Причем имя функции можно указывать в выражениях!

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

ленным значением.

В последнее время входит в моду присваивать значение внутри функции не имени функции, а системной переменной Result.

Функция или процедура может в свою очередь вызывать другие функции или процедуры, причем может вызывать и саму себя! Уровень вложенности при этом не ограничен. Хотя на практике стараются избегать слишком глубоко вложенных функций (процедур), так как это увеличивает вероятность появле-

ния трудно находимых ошибок и, кроме того, ухудшает читабельность и пони-

мание логики работы программы.

3.1.1.3 Глобальные и локальные переменные

Обычно любая программа, функция или процедура использует какие-то переменные, константы, функции и процедуры. В программе любой объект пе-

ред ее использованием должен быть описан в разделе описаний. При этом у ка-

ждой переменной, а также константы, функции или процедуры есть своя об-

ласть видимости, где они могут использоваться. Если объект описан в подпро-

грамме, то доступ к ней из вызывающей программы невозможен. Этот объект является локальным по отношению к подпрограмме, где он описан, т.е. "не ви-

144

Глава 3 Более сложные элементы языка

____________________________________________________________________

дим" в вызывающей программе. Такие переменные, константы, функции и про-

цедуры называются локальными. В то же время, объекты, описанные в вызы-

вающей программе, доступны вызываемым подпрограммам, т.е. "видимы" им.

Такие объекты называются глобальными.

Рассмотрим пример, чтобы глубже понять вышесказанное:

program console_app; {$mode objfpc}{$H+} uses

CRT, FileUtil; var

x: integer; // Глобальная переменная

procedure local_global; // процедура без параметров begin

x:= 25; // Глобальная переменная х доступна процедуре writeln(UTF8ToConsole('Значение переменной x')); writeln(UTF8ToConsole('внутри процедуры = '), x);

end; // конец процедуры

begin // начало главной программы

x := 1;

writeln(UTF8ToConsole('Глобальная переменная x')); writeln(UTF8ToConsole('до вызова процедуры = '), x); local_global; // вызов процедуры writeln(UTF8ToConsole('Глобальная переменная x')); writeln(UTF8ToConsole('после вызова процедуры = '), x); writeln(UTF8ToConsole('Нажмите любую клавишу'));

readkey;

end.

145