ReferatWorld.ru

Графика Турбо Паскаля

Для использования графических возможностей Турбо Паскаля необходимо в блоке описания uses подключить графический модуль Graph . Модуль содержит набор графических функций и процедур, основные из которых рассмотрены ниже.

Графические процедуры

Arc (x,y: integer; St,En,R: word); {рисование дуги, где x,y - коорд. центра дуги, R - радиус, St, En - нач. и конечный углы. }

ClearDevice ; {очистка экрана}

Circle (x,y: integer; R: word); {окружность радиуса R

cцентром в точке (x,y) }

CloseGraph ; {закрытие графики}

InitGraph (gd,gm: integer; Path: string); {инициализация графики, где

gd - графический драйвер,

gm - графический режим,

Path - путь размещения файла

с расширением. bgi . }

Line (x1,y1,x2,y2: integer); {рисование линии, проходящей через две точки:

с координатами (x1,y1) и (x2,y2) }

LineRel (dx,dy: integer); {рисование линии: dx, dy - приращения

координат к координатам текущей

позиции курсора}


LineTo (x,y: integer); {рисование линии, проходящую через текущую

позицию курсора и точку с координатами (x,y ) }

Moveto (x,y: integer); {задание координат текущей точки}

OutText (T: string); {вывод текста в текущую точку}

OutTextXY (x,y: integer; T: string); {вывод текста в точку с координатами х, у }

Rectangle (x1,y1,x2,y2: integer); {рисование прямоугольника: (x1,y1) и (x2,y2) - координаты противоположных вершин}

PutPixel (x,y: integer; c: word); {выводит точку с координатами (х, у) цветом с }

Графические функции

GetMaxX - определяет максимальный размер экрана по оси x.

GetMaxY - определяет максимальный размер экрана по оси y.

GetX - координата текущей позиции курсора по оси x.

GetY - координата текущей позиции курсора по оси y.

Машинные координаты.

Начало машинной системы координат, направление осей, а также максимальные значения координат монитора показаны на рисунке

На рисунке приведена также машинная (xm , ym ) и физическая (x,y) системы координат. Для изображения на экране точки с физическими координатами (x,y) необходимо определить ее машинные координаты (xm , ym ). Расчетные формулы имеют следующий вид (попробуйте самостоятельно получить эти формулы):

xm =x0 +x*Mx,

ym =y0 -y*My ,

где Mx , My -масштабы соответственно по осям x и y, которые показывают число пикселей в одной физической единице,

x, y - физические координаты точки,

xm , ym - машинные координаты точки,

x0 , y0 - машинные координаты начала физической системы координат.

Пример. Нарисовать через весь экран горизонтальную и вертикальную линии, пересекающиеся в центре монитора.

Этапы разработки программы сведены в таблицу.

Таблица

N Этапы программирования Выполнение
1. Постановка задачи Нарисовать через весь экран горизонтальную и вертикальную линии, пересекающиеся в центре монитора.
2. Математическое описание

Изобразим вид экрана с указанием координат

требуемых линий

3.

Разработка структограммы
4. Написание программы

Program P5;

Uses graph; { подключение граф. модуля}

Var gd,gm: integer;

Begin

gd: =detect; { определение граф. драйвера}

InitGraph (gd,gm,’ ‘); { инициализация

графики}

Line (0, round (GetMaxY/2), GetMaxX,

Round (GetMaxY/2)); {гориз. лин. }

Line (round (GetMaxX/2), 0,Round (GetMaxX/2), GetMaxY);

{вертик. лин. }

Readln; { пустой ввод}

CloseGraph; {закрытие графики}

End.

5. Отладка и получение результатов Выполнить самостоятельно

Пример. Написать программу построения графика функции y=x2 для x∈ [-1; 1].

Этапы разработки программы сведены в таблицу.


Таблица

N Этапы программирования Выполнение
1. Постановка задачи Построить график функции y=x2 для x∈ [-1; 1].
2. Математическое описание

Изобразим вид экрана, который мы хотели бы получить после выполнения программы.

3. Разработка структограммы
4. Написание программы

Внимание, отключите Adblock

Вы посетили наш сайт со включенным блокировщиком рекламы!
Ссылка для скачивания станет доступной сразу после отключения Adblock!

Скачать
Рефераты по информатике и программированию Для использования графических возможностей Турбо Паскаля необходимо в блоке описания uses подключить графический модуль Graph . Модуль содержит
Оценок: 1011 (Средняя 5 из 5)

Одними из наиболее популярных услуг на рынке IT-технологий являются создание и продвижение лендингов. Они способны положительно влиять на деятельность любого бизнес-проекта в интернете. Судя по многочисленным отзывам, заказавшие создание лендингов люди ни разу не пожалели о потраченных деньгах. Они вложили в будущее, которое неразрывно связано с интернетом. Всё больше и больше предпринимателей обращаются к услугам разных агентств, веб-студий, чтобы заказать создание лендинга у профессионалов.

© 2017 - 2022 ReferatWorld.ru