- •«Вычислительная техника и программирование»
- •0702 «Прикладная физика»
- •Тема 1. Основы алгоритмизации
- •В вод / Вывод данных Блок вычислений
- •Задания для практических занятий
- •Тема 2. Язык программирования
- •Вопросы для практических занятий
- •Тема 3. Интегрированная система программирования Turbo Pascal
- •Задания для практических занятий
- •Тема 4. Элементы алгоритмического языка Pascal
- •Вопросы и задания для практических занятий
- •Тема 5: Структура программы
- •Задания для практических занятий
- •Раздел 6.1 Линейная алгоритмическая структура
- •Задания к практическим занятиям
- •Раздел 6.2 Алгоритмическая структура – ветвления
- •Где If, then, else – зарезервированные слова
- •Задания к практическим занятиям
- •Задания для практических занятий
- •Раздел 6.3 Алгоритмическая структура - циклы
- •Оператор цикла с постусловием Repeat . . . Until
- •Задание для практических занятий
- •Тема 7. Структурированные типы данных
- •7.1 Массивы
- •Двумерный массив (матрица)
- •Задания для практических занятий
- •7.2 Множества
- •Задания и вопросы к практическим
- •7.3 Записи
- •Вопросы к практическим занятиям
- •Задание к практическим занятиям
- •Задания к практическим занятиям
- •Тема 8. Строки
- •Задания к практическим занятиям
- •Тема 9. Подпрограммы (Процедуры. Функции)
- •Пример:
- •Задания к практическим занятиям
- •Тема 10. Графика
- •В tp принята следующая система координат графического режима.
- •Задание к практическим занятиям
- •Меры длины
- •Линии и точки
- •Процедура SetLineStyle. Устанавливает новый стиль вычерчиваемых линий.
- •Список литературы
- •Пособие для изучения дисциплины «Вычислительная техника и программирование»
- •Специальности 6.070200 «радиофизика и электроника»
Тема 10. Графика
Текстовый режим.
Все процедуры и функции, управляющие текстовым режимом, сосредоточены в модуле CRT библиотечного файла Turbo.tpl и становятся доступными после подключения библиотечного модуля CRT (USES CRT).
Основные используемые процедуры: TextColor (Color: Byte) – определяет цвет выводимых символов. TextBackground (Color: Byte) – определяет цвет фона.
Параметр обращения к этим процедурам - выражение типа Byte, задающее код нужного цвета. Код определяется с помощью констант, объявленных в модуле СRT.
Сonst
Black =0; {Черный}
Blue =1; {Темно - синий}
Green =2; {Темно - зеленый}
Cyan =3; {Бирюзовый}
Red =4; {Красный}
Magenta=5; {Фиолетовый
Brown =6; {Коричневый}
Lightgray=7; {Светло - серый}
DarkGray=8; {Темно - серый}
Lightblue=9 {Синий}
Lightgreen=10{Светло- Зеленый}
Lightcyan =11 {Светло- бирюзовый}
Lightred =12 {Розовый}
LightMagneta =13 {Малиновый}
Yellow =14 {Желтый}
White =15 {Белый}
Blink =128 {Мерцание символа}
Процедуры СlrScr – очищает окно или экран;
Window (x, y, x2, y2: byte),
где x1,y1 – координаты левого верхнего, x2, y2 - координаты правого нижнего углов окна. Определяют текстовое окно – область экрана, которая рассматривается процедурами вывода как весь экран.
GotoXY (1, 1) - означает указание перевести курсор в левый верхний угол экрана (или окна, если к этому моменту на экране определено окно).
Графический режим.
Переход в графический режим работы и возврат в текстовый осуществляется процедурой INITGRAPH.
INITGRAPH (<драйвер>, <режим>, <путь>), где
<драйвер> - переменная типа INTEGER определяет тип графического драйвера.
<режим> - переменная типа INTEGER определяет режим работы графического адаптера.
<путь> - выражение типа STRING, содержащее путь к файлу драйвера.
Автоматическое определение типа драйвера:
Driver: = Detect;
InitGraph (Driver, Mode, ‘C:\TP\BGI’);
Пример:
program InitDemo;
uses Graph;
var
GraphDriver, GraphMode: Integer;
Begin
GraphDriver:=Detect;
InitGraph (GraphDriver, GraphMode, ‘C:\BP\BGI’);
Line (0, 0, GetMaxX, GetMaxY);
Readln; {задержка последней картинки на экране}
CloseGraph;
End.
Основные процедуры используемые в графическом режиме.
CloseGraph. Завершает работу адаптера в графическом режиме и восстанавливает текстовый режим работы экрана.
RestoreCRTMode. Служит для кратковременного возврата в текстовый режим. В отличие от вышеприведенной процедуры не сбрасываются установленные параметры графичекого режима и не особождается память, выделенная для размещения графического драйвера.
Функция GetGraphMode. Возвращает значение типа Integer, в котором содержится код установленного режима работы графического адаптера.
Процедура SetGraphMode. Устанавливает новый графический режим работы адаптера.
В tp принята следующая система координат графического режима.
Координата Х
(0, 0) (GetMaxX, 0)
К
о
р
д.
Y
(0, GetMaxY) (GetMaxX, GetMaxY)
GetMaxX, GetMaxY – стандартные функции модуля Graph, которые возвращают соответственно максимальные координаты по осям Х и Y в зависимости от текущего режима видеоадаптера.
Наиболее часто употребляемые графические процедуры и функции приведены в приложении №6.