Использование графических возможностей языка программирования (точка, отрезок, окружность, прямоугольник)

При работе в графическом режиме изображение на экране строится не из

Геометрические размеры пикселя определяются разрешением монитора. Разрешение монитора задается в виде

Любая графическая картинка формируется из простых геометрических фигур. Это точки, отрезки

Началом отсчета является левый верхний угол экрана. Значения х – координаты

Важно помнить:
Графические координаты принимают только целочисленные значения.
Графические координаты принимают значения,

Рисование различных геометрических фигур осуществляется с помощью специальных стандартных команд (процедур).

В модуле GraphAbc с помощью команды setwindowsize(X,Y) можно задавать размеры графического

Рисование точки setpixel(x:integer,y:integer,c:color) – рисует пиксел (точку) с координатами (х,у) цветом

Пример 1. Демонстрация подключения модуля GraphAbc

program tochka;
uses graphabc; {подключение модуля GraphAbc}
begin
setwindowsize(640,480);

Рисование линий

Общий вид команды:
Line(x1,y1,x2,y2), где (x1,y1) и (x2,y2) - координаты точек

Пример 2. Демонстрация рисования линии

Программа рисования отрезка, соединяющего две точки с

И вот что мы увидим на экране монитора после выполнения данной

Пример 3. Демонстрация рисования линий разным цветом пера

program treugolnik;
uses graphabc;
begin
setwindowsize(640,480);

После выполнения программы на экране монитора появится графическое окно со следующим

Важно помнить:
Рисуя линии, можно задавать ее размер (координатами ее концов), цвет,

Пример 4. Демонстрация рисования замкнутых фигур с помощью линий и их

В результате выполнения программы на экране монитора в графическом окне появится

Важно помнить:
Закрашивать можно только замкнутые фигуры, контур которых нарисован одним цветом.
В

Рисование прямоугольников и окружностей

Прямоугольники можно рисовать с помощью команды rectangle(x1,y1,x2,y2)
Окружности можно

Пример 5. Демонстрация рисования прямоугольника и окружности

program gemetry;
uses graphabc;
begin
setwindowsize(640,480);
setpencolor(clBlue);

Результат выполнения программы

Пример 6. Демонстрация закрашивания прямоугольника и окружности и их надписи

program gemetry3;
uses

После выполнения программы графическое окно на экране монитора будет выглядеть так:

Из приведенного выше примера видно, что рисовать можно на «холсте» определенного

С помощью процедур setfontcolor, setfontstyle, setfontsize, setbrushcolor, textout рисунки можно подписать.

Создать такую картинку:

program skvoreshnik;
uses graphabc;
begin
setwindowsize(1280,1024);
clearwindow(clwhite); {устанавливает белый цвет фона}
setpencolor(clteal); {устанавливает