- •Полный обучающий курс Turbo Pascal
- •Введение
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Алфавит языка Турбо Паскаль
- •1.1. Алфавит и словарь языка Паскаль
- •Глава 1. Основные понятия системыпрограммирования Турбо Паскаль Величины в Паскале
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Структура программы
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Типы данных
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Целочисленные типы данных
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Вещественные типы данных
- •Глава 1. Основные понятия системы программирования Турбо Паскаль
- •Стандартные математические функции
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Ввод и вывод данных
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Ввод данных с клавиатуры
- •Глава 1. Основные понятия системы программирования Турбо Паскаль Вывод данных
- •Глава 2. Операторы языка Паскаль Общие сведения
- •Глава 2. Операторы языка Паскаль Оператор присваивания
- •Глава 2. Операторы языка Паскаль Оператор вызова процедуры
- •Глава 2. Операторы языка Паскаль Оператор безусловного перехода
- •Глава 2. Операторы языка Паскаль Пустой оператор
- •Глава 2. Операторы языка Паскаль Структурные операторы
- •Глава 2. Операторы языка Паскаль Составной оператор
- •Глава 2. Операторы языка Паскаль Условные операторы
- •End;end. Глава 2. Операторы языка Паскаль Операторы повтора (цикла)
- •Глава 3. Процедуры и функции Стандартные библиотечные модули
- •Глава 3. Процедуры и функции Процедуры
- •Глава 3. Процедуры и функции Функции
- •Глава 4. Массивы Одномерные массивы
- •Глава 4. Массивы Двумерные массивы
- •Глава 5. Строковые величины Символьные величины
- •Глава 5. Строковые величины Строковые величины
- •Глава 6. Графика в системе Турбо Паскаль Графика в Турбо Паскале
- •Глава 6. Графика в системе Турбо Паскаль Базовые процедуры и функции
- •Процедуры модуля Graph
- •Функции модуля Graph
- •Глава 6. Графика в системе Турбо Паскаль Экран и окно в графическом режиме
- •Глава 6. Графика в системе Турбо Паскаль Вывод простейших фигур Вывод точки
- •Цветовая шкала
- •Вывод линии
- •Глава 6. Графика в системе Турбо Паскаль Построение многоугольников Построение прямоугольников
- •Построение многоугольников
- •Глава 6. Графика в системе Турбо Паскаль Построение дуг и окружностей
- •Стандартные стили заполнения
- •Глава 6. Графика в системе Турбо Паскаль Работа с текстом Вывод текста
- •Вывод численных значений
- •Выравнивание текста
- •Глава 6. Графика в системе Турбо Паскаль Построение графиков функций
- •Вариант 1
- •Вариант 2
- •Глава 6. Графика в системе Турбо Паскаль Циклы в графике. Построение случайных процессов
- •Глава 6. Графика в системе Турбо Паскаль Создание иллюзии движения
Глава 3. Процедуры и функции Стандартные библиотечные модули
В систему Турбо Паскаль версии 6.0. и старше включены 8 модулей: System, Crt, Dos, Graph, Graph3, Overlay, Printer, Turbo3 и специализированная библиотека Turbo Vision. Модуль System подключается по умолчанию, поэтому в любой программе становятся доступными все его встроенные процедуры и функции (см главу 1.3.). Остальные модули должны подключаться с помощью зарезервированного слова uses с добавлением имени модуля. Например: uses Crt.
Рассмотрим кратко назначение каждого модуля.
System - сердце Турбо Паскаля. Подпрограммы, содержащиеся в нем, обеспечивают работу всех остальных модулей системы.
Crt - содержит средства управления дисплеем и клавиатурой компьютера.
Dos - включает средства, позволяющие реализовывать различные функции Dos.
Graph3 - поддерживает использование стандартных графических подпрограмм.
Overlay - содержит средства организации специальных оверлейных программ.
Printer - обеспечивает быстрый доступ к принтеру.
Turbo3 - обеспечивает максимальную совместимость с версией Турбо Паскаль 3.0.
Graph - содержит пакет графических средств.
Turbo Vision - библиотека объектно-ориентированных программ для разработки пользовательских интерфейсов.
На примере модуля Crt познакомимся поближе с работой встроенных процедур и функций. Он устанавливает режим работы адаптера дисплея, организует вывод в буфер экрана, регулирует яркость свечения символов и т.д. С момента подключения пользователю доступны все содержащиеся в нем стандартные средства. Рассмотрим некоторые из них.
§ Установка текстового режима
TextMode(Mode:integer);
Значение Modeравно 1 (40 / 25) или 3(80 / 25).
§ Очистка экрана
ClrScr– полностью очищает экран;
ClrEol– стирает все символы в строке, начиная с текущей позиции до конца строки;
§ Управление курсором
GotoXY(x,y) – перемещает курсор в позицию, заданную координатамиx,y.
§ Управление цветом
TextColor(Color:byte) - установка цвета выводимых символов;
TextBackGround(Color) – цвет фона.
Чтобы добавить при выводе эффект мерцания, при установке цвета указывается Blink(16).
Пример. Вывести в центре экрана цветными символами слово «Привет» с эффектом мерцания.
Program primer;
Uses crt;
Begin
TextMode(3);
Clrscr;
Gotoxy(36,12);
Textcolor(5+16);
Write(‘Привет’);
End.
Глава 3. Процедуры и функции Процедуры
Для использования подпрограммы-процедуры необходимо сначала описать процедуру, а затем обращаться к ней (обращение к процедуре – отдельный оператор). Описание процедуры включает заголовок (имя) и тело процедуры. Заголовок состоит из зарезервированного слова procedure, имени процедуры и, заключенного в скобки, списка формальных параметров с указанием типа. Название «формальные» эти параметры получили в связи с тем, что в этом списке заданы только имена для обозначения исходных данных и результатов работы процедуры, а при вызове подпрограммы на их место будут поставлены конкретные значения. Тело процедуры – блок, по структуре аналогичный программе.
При создании программ, использующих процедуры, следует учитывать, что все объекты, которые описываются после заголовка в теле процедуры, называются локальными объектами и доступны только в пределах этой процедуры.
Все объекты, описанные в вызывающей программе, называются глобальными и являются доступными внутри процедур, вызываемых этой программой.
Общий вид описания процедуры:
Procedure <имя> (список формальных параметров, блок описания);
Const …; ù
… ý блок описания
Var ….; û
begin
<операторы>
end;
Пример 1. Вывести по четырем углам экрана свое имя цветными буквами, можно с эффектом мерцания.
Program names;
Uses crt;
Procedure name(x, y, c: byte, );
Begin
Gotoxy (x, y);
Textcolor(c); {textcolor (c+16);}
Write(‘Имя’);
end;
begin
Clrscr; {очистка экрана}
name (2,2, 14);
name (2, 22, 8);
name (75,2, 3);
name (75, 22, 5);
End.
Пример 2. Найти наибольшее из четырех чисел, используя подпрограмму нахождения наибольшего из двух чисел.
Program max;
Uses crt;
Var a, b, c, d, m, p, q:real;
Procedure Bd(x,y:real, var z: real);
Begin
If x>y then z:=x
else z:=y;
end;
begin
Clrscr; {очистка экрана}
Write(‘Введите числа’);
Readln(a,b,c,d);
Bd (a, b, p);
Bd (c, d, q);
Bd (p, q, m);
Writeln(‘наибольший элемент’, m:8:3);
End.