П Р О Ц Е Д У Р Ы
Программу, состоящую только из операторов, называют МОНОЛИТНОЙ.
Программу, содержащую процедуры и функции называют МОДУЛЬНОЙ.
ПРОЦЕДУРА - часть программы, имеющая имя и предназначенная для решения определенной задачи. Каждая процедура определяется только однажды, но может использоваться многократно. Процедуры определяются в разделе описаний вслед за разделом переменных.
PROCEDURE Name; prоcedure - служебное слово;
BEGIN Name - идентификатор отражающий смысл данной задачи;
ИНСТРУКЦИЯ Описание процедуры само по себе никакого действия не
END; вызывает. Чтобы исполнить процедуру, необходимо в нужном
месте программы поместить обращение к ней, указав Name; .
Например: Напечатать сорок любых символов.
В программе используется функция WhereX – она определяет позицию курсора в строке (принимает значения от 1 до 80, изменяется автоматически при выводе информации на экран). С помощью этой функции можно проверить, где находится курсор. Аналогичная функция WhereY– определяет строку, в которой в данный момент находится курсор (принимает значения от 1 до 25). Условие (wherex<40) означает, что при выводе на экран еще не достигнута 40 позиция в текущей строке.
Program Stroka; Uses crt; { Stroka - имя программы }
procedure Str_Simw; { Str_Simw - имя процедуры }
Begin
while wherex<40 do write('$'); { - тело процедуры }
