Рабочие листы
к вашим урокам
Скачать
1 слайд
Графические примитивы в Паскале
2 слайд
Изображение на экране монитора формируется из точек (пикселей) определенного цвета. Положение каждой точки задается ее координатами.
Началом отсчета является левый верхний угол экрана.
3 слайд
4 слайд
Векторное изображение формируется из простых геометрических фигур
(графических примитивов), например, точек, отрезков, прямоугольников, окружностей, эллипсов.
5 слайд
Библиотека стандартных графических процедур и функций хранится в модуле GraphABC .
Uses GraphABC.
Размеры графического окна можно задавать с помощью процедуры
SetWindowSize (w, h), где w и h – ширина и высота окна.
6 слайд
Основные инструменты рисования — перо и кисть.
Перо (Pen) задает свойства линий и контуров фигур (толщина в пикселях, цвет…).
Пример: толщина пера 5 пикселей setPenWidth(5);
Кисть (Brush) — их закраска.
Пример: желтый цвет кисти setBrushColor(clYellow)
7 слайд
Константы стандартных цветов:
clBlack – черный
clPurple – фиолетовый
clWhite – белый
clMaroon – темно-красный
clRed – красный
clNavy – темно-синий
clGreen – зеленый
clBrown – коричневый
clBlue – синий
clSkyBlue – голубой
clYellow – желтый
clGray –серый
clLtGray – светло-серый
clDarkGray – темно-серый
clSilver – серебряный
8 слайд
Пример 1. Составить программу, которая рисует на экране графические
примитивы: отрезок, прямоугольник, круг, эллипс.
9 слайд
program grafika;
uses graphABC; { подключение модуля graphABC }
begin
setWindowSize(600,240); // размеры окна
line(80,40,500,40); // отрезок
setPenWidth(5); // толщина пера
setPenColor(clBrown); setBrushColor(clYellow); // цвет пера и кисти
rectangle(40,80,200,160); // прямоугольник
setPenColor(clRed); setBrushColor(clAqua);
circle(300,120,40); // круг
setPenColor(clBlue); setBrushColor(clRed);
ellipse(400,80,540,160); // эллипс
setFontSize(15); setFontStyle(fsBold); // размер и начертание шрифта
setFontColor(clBrown); setBrushColor(clWhite);
textOut(120,180,'Графические примитивы'); // вывод текста end.
10 слайд
11 слайд
Пример 2. Составить программу, которая демонстрирует разложение белого света в призме
12 слайд
program prizma;
uses graphABC; { подключение модуля graphABC }
begin
setWindowSize(400,340); { размеры окна }
ClearWindow(clGray); { серый фон }
line(200,40, 300,300); { треугольник }
line(200,40, 100,300); line(100,300, 300,300);
FloodFill(200,200,clSilver); { заливка }
setPenWidth(8); { толщина пера 8}
setPenColor(clWhite); line(20,150, 164,150); { падающий луч }
setPenWidth(5); { толщина пера 5}
{ Преломленные лучи: красный, желтый, синий
Цвет задается константами стандартных цветов }
setPenColor(clRed); line(164,147, 240,160); lineTo(360,190);
setPenColor(clYellow); line(164,150, 245,170); lineTo(360,220);
setPenColor(clBlue); line(164,153, 250,185); lineTo(360,260); end.
Рабочие листы
к вашим урокам
Скачать
6 663 584 материала в базе
Настоящий материал опубликован пользователем Корнилова Ирина Алексеевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
300/600 ч.
Курс повышения квалификации
36 ч. — 180 ч.
Курс профессиональной переподготовки
500/1000 ч.
Мини-курс
10 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.