Во многих программах для большей привлекательности требуется изменять стилевое оформление.

Пример ниже показывает, как стереть экран, изменить фон экрана на жёлтый, изменить координаты текста и изменить цвет текста на красный.
Uses CRT;
Begin
textBackground(yellow);
clrscr;
textColor(red);
goToXY(20, 20);
writeln('Hello!');
readln;
End.
В первой строке мы подключаем библиотеку CRT, в которой хранятся команды стилевого оформления (на Паскале библиотека - это дополнительный набор команд и/или переменных). Команда Uses, после которой через запятую указываются названия библиотек, подключает эти библиотеки.
А вот ещё команды, использованные в этой программе:
- clrscr - стирает экран;
- textBackground(цвет) - меняет фон текста, указанный в скобках (название или номер), но если разместить его перед clrscr, то он изменит фон экрана;
- textColor(цвет) - меняет цвет текста, указанный в скобках (название или номер).
- goToXY(координата X, координата Y) - меняет координаты текста на координаты X и Y, указанные в скобках. Координата X может меняться от 0 до 80, а координата Y - от 0 до 25.
Задание:
Стереть экран. Сменить координату X на 15, а Y - на 12. Сменить цвет экрана на красный. Сменить фон текста на жёлтый. Сменить цвет текста на зелёный. Написать: "Hello, world!!!".
Ответ:
Uses crt;
Begin
textBackground(red);
clrscr;
goToXY(15, 12);
textBackground(yellow);
textColor(green);
writeln('Hello, world!!!');
readln;
End.
Урок 4 закончен.