9.2. Стандартные модули

В пакет TurboPascal 5.5 включены 8 стандартных модулей:

System – содержит все стандартные процедуры и функции классического языка Pascal. Присоединяется ко всем программам по умолчанию.

Dos – определяет паскалевские процедуры и функции, эквивалентные наиболее употребляемым командам операционной системы.

Crt – обеспечивает описание констант, переменных и программ для операции ввода-вывода: действия с экраном дисплея, клавиатурой, звуковым сигналом.

Printer – описывается текстовый файл Lst, позволяющий организовать вывод на печать с использованием оператора Write.

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

Graph3 – поддерживает графические подпрограммы, выполненные с использованием пакета TurboPascal 3.0.

Turbo3 – поддерживает некоторые операторы пакета TurboPascal старых версий, отсутствующие в пакете TurboPascal 5.5.

Overlay – поддерживает операторы реализации оверлейного режима перераспределения памяти при хранении больших программ.

10. Процедуры (Procedure)

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

10.1. Объявление процедур

При объявлении процедур используется управляющее слово procedure, за которым указывается название, перечень и тип параметров, передаваемых процедуре, и помещается блок процедуры. Блок процедуры включает раздел описания переменных и раздел операторов, заключенный между управляющими словами begin и end;. Объявление процедуры выполняется в разделе описаний.

Пример: procedure ramka(x1;y1;x2;y2:integer);

var i: integer;

begin

gotoXY(x1,y1);

for i:=x1 to x2 do

write(‘-’);

for i:=y1+1 to y2 do

begin

gotoXY(x1,i);write(‘|’);

gotoXY(x2,i);write(‘|’);

end;

gotoXY(x1,y2);

for i:=x1 to x2 do

write(‘-’);

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

{При вызове процедура ramka рисует рамку с координатами левого верхнего угла x1,y1, правого нижнего угла x2,y2. Сначала заполняется дефисом “-” верхняя горизонтальная линия, затем построчно сверху вниз вертикальные края рамки “|” и нижняя горизонтальная линия. Пример вызова процедуры: ramka(a,b,c,d);}

10.2. Некоторые стандартные процедуры TurboPascal 5.5

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

ClrScr; {Crt} – очистка экрана, курсор в левом верхнем углу;

delay(t:integer); {Crt} – задержка выполнения программы на t миллисекунд;

Exit; {System} – выход их текущего блока;

GotoXY(a,b:byte); {Crt} – установка курсора в строку номер b сверху, на символ номер a слева;

Randomize; {System} – активизация генератора случайных чисел.

11. Функции (Function)

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