Запуск программы

Для того чтобы запустить программу, необходимо выйти в главное меню (например, посредством клавиши [F10] и выбрать режим Run. После запуска программы на экране появится сообщение:

Введите два целых числа через пробел

Курсор окажется в следующей строке. Затем надо ввести два целых числа через пробел и нажать клавишу [Enter]. Появится сообщение:

Их произведение равно...

Вместо точек будет напечатано значение переменной rez, то есть число, равное произведению первого введенного числа на второе. Это сообщение останется на экране до тех пор, пока не будет нажата клавиша [Enter].

Сохранение программы

Для того чтобы сохранить программу, необходимо выйти в главное меню и выбрать пункт File. Затем в появившемся вертикальном меню надо выбрать пункт Save as... Появится окно, в котором можно ввести имя файла. Например, а:\prim1_1. pas; здесь а: − это название диска, "\" − каталог (корневой), prim1_1 − имя файла (оно может содержать не более 8 символов), .pas − расширение, указывающее, что файл содержит программу, написанную на языке Паскаль.

Примечание. Следует знать список символов, которые нельзя употреблять в именах файлов:

* = + [ ] \ | ;:,.<>/?.

Также не следует использовать в именах файлов символ пробела и буквы русского алфавита.

После того как имя файла набрано, нажмите клавишу [Enter].

Примечание. Для быстрого сохранения файла можно воспользоваться командами Save или Save all меню File.

Для того чтобы закончить работу, необходимо выбрать пункт Quit в меню File или просто набрать комбинацию клавиш Alt^X.

§5. Управление позициями и цветом вывода

К программам в языке Паскаль можно подключать библиотечные модули, в которых находятся множество процедур для работы с экраном в текстовом режиме, реализации графических возможностей Паскаля и др. Модули поставляются вместе с системой программирования Паскаль, а также могут создаваться программистом для собственных программ. Один из модулей, к которому вы часто будете обращаться − это модуль CRT, который содержит процедуры для работы с экраном в текстовом режиме. Для подключения модуля после заголовка программы запишите оператор использования Uses и после него используемый модуль, например Uses CRT.

В модуле CRT имеется процедура позиционирования курсора, который позволяет установить координаты вывода информации на экран (номер строки y и номер столбца x). Экран при этом представляется в виде прямоугольной сетки знакомест размером 80 столбцов и 25 строк с началом отсчета в левом верхнем углу.

Оператор позиционирования имеет следующий вид:

GotoXY(x,y).

Этот оператор устанавливается непосредственно перед выводом информации.

Для изменения цвета выводимой информации в модуле CRT реализованы операторы изменения параметров цвета символов и знакомест:

TextColor(c1); TextBackGround(c2).

Здесь с1 означает цвет символа (может менять значение от 0 до 15), с2 − цвет фона этого символа (0...7) из стандартной таблицы цветов. В Паскале эти значения могут задаваться как встроенными константами (yellow, red,...), так и их числовыми эквивалентами (14, 4) (кодами).

Цвет	Константа	Код
Черный Синий Зеленый Бирюзовый Красный Малиновый Коричневый Светло-серый Темно-серый Светло-синий Светло-зеленый Светло-бирюзовый Светло-красный Светло-малиновый Желтый Белый	Black Blue Green Cyan Red Magenta Brown LightGray DarkGray LightBlue LightGreen LightCyan LightRed LightMagenta Yellow White	0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Теперь перепишем первую нашу программу, используя операторы управления цветом и позициями вывода. В эту программу добавим также процедуру ClrScr, которая находится в модуле CRT и используется для очистки экрана.

Program Proizvedenie_1;

Uses CRT;

Var a,b,rez: Integer;

Begin

ClrScr;

TextColor(Yellow);

TextBackGround(Red);

Writeln('Введите два числа через

пробел');

Readln(a, b);

rez:=a*b;

Writeln('Их произведение равно ', rez);

GotoXY(30,15);

Writeln('Нажмите <Enter>');

Readln;

End.