Раздел инициализации
Этот раздел позволяет установить связь с теми или иными файлами с помощью процедуры Assign, инициировать какие-то переменные (например, положить S:= 0; P:= 1), константы-переменные (типизированные константы), выполнить какие-то другие одноразовые действия, которые всегда будут исполняться в начала программы, например, печать сообщения на экране при помощи процедуры WriteLn («Привет!»);
Раздел начинается словом begin, после которого могут стоять исполнительные операторы, а заканчивается словом end. (с точкой).
Если инициализация чего-либо (файлов, переменных, типизированных констант) не требуется, то в разделе помещается лишь слово end. (с точкой).
Если в программе и ее модуле описываются переменные с одним и тем же именем, то такая переменная модуля в программе является невидимой. Ее доступность в программе можно обеспечить лишь при помощи квалификатора, который ставится перед такой переменной и отделяется от нее точкой. В качестве квалификатора выступает имя модуля. Например, в теле программы с модулем My_Modyl возможны такие операторы:
X:=5; {х – глобальная переменная}
My_Mody1.X:=4; {Х – описана в интерфейсе модуля My_Mody.1.}
X:=X+ My_Mody1.X; {В ячейке Х будет хранится число 9}
Аналогичным образом можно поступить и для обеспечения видимости переменной модуля программы в любой ее подпрограмме, если имена переменной модуля и локальной переменной подпрограммы совпадают. Более того, при помощи квалификатора можно сделать видимой в подпрограмме глобальную переменную программы, одноименную локальной переменной подпрограммы:
X:=5; {х – глобальная переменная}
…..
{Тело подпрограммы My_Podprogramma}
My_Mody.1.X:=4; {Х–локальная переменная подпрограммы My_Podprogramma}
X:=X+ My_Podprogramma.X; {В ячейке Х будет хранится число 9}
Если к вашей программе подключен модуль, в интерфейсе которого объявлены другие модули, то все объекты этих модулей в программе окажутся невидимыми. Для обеспечения их доступности в программе все их имена необходимо объявить непосредственно в директиве компилятора uses программы.
Достарыңызбен бөлісу: |