Инфоурок / Информатика / Презентации / «Введение в графику в языке программирования Turbo Pascal»

«Введение в графику в языке программирования Turbo Pascal»



Московские документы для аттестации!

124 курса профессиональной переподготовки от 4 795 руб.
274 курса повышения квалификации от 1 225 руб.

Для выбора курса воспользуйтесь поиском на сайте KURSY.ORG


Вы получите официальный Диплом или Удостоверение установленного образца в соответствии с требованиями государства (образовательная Лицензия № 038767 выдана ООО "Столичный учебный центр" Департаментом образования города МОСКВА).

ДИПЛОМ от Столичного учебного центра: KURSY.ORG


библиотека
материалов
Урок по теме: «Введение в графику в языке программирования Turbo Pascal» Авто...
1 7 6 5 4 3 2 8 9 0
Program paravozzz; uses crt, graph; var gd,gm,i,x,y:integer; begin gd:=detect...
1. Как называется модуль, который подключает графический редактор? 2. Номер н...
10 1

Описание презентации по отдельным слайдам:

№ слайда 1 Урок по теме: «Введение в графику в языке программирования Turbo Pascal» Авто
Описание слайда:

Урок по теме: «Введение в графику в языке программирования Turbo Pascal» Автор: Халимова Толкын Абдугалиевна

№ слайда 2
Описание слайда:

№ слайда 3
Описание слайда:

№ слайда 4 1 7 6 5 4 3 2 8 9 0
Описание слайда:

1 7 6 5 4 3 2 8 9 0

№ слайда 5
Описание слайда:

№ слайда 6
Описание слайда:

№ слайда 7
Описание слайда:

№ слайда 8 Program paravozzz; uses crt, graph; var gd,gm,i,x,y:integer; begin gd:=detect
Описание слайда:

Program paravozzz; uses crt, graph; var gd,gm,i,x,y:integer; begin gd:=detect; initgraph(gd,gm,''); if graphresult<>grok then halt(1); paravoz; koleso; readln; end. procedure paravoz; begin setfillstyle(1,4); bar3d(100,280,280,380,25,true); setfillstyle(1,5); bar3d(280,180,400,380,25,true); setcolor(1); setfillstyle(1,yellow); bar3d(300,200,380,260,0,false); setfillstyle(1,12); bar3d(120,300,260,360,0,false); rectangle(300,285,380,370); end; procedure koleso; begin x:=160; for i:=1 to 3 do begin setfillstyle(1,1); fillellipse(x,380,40,40); setfillstyle(1,3); fillellipse(x,380,30,30); x:=x+100; end; end;

№ слайда 9 1. Как называется модуль, который подключает графический редактор? 2. Номер н
Описание слайда:

1. Как называется модуль, который подключает графический редактор? 2. Номер наибольшего режима для текущего драйвера возвращает функция… . 3.Что делает процедура: Line (x1, y1, x2, y2)? 4. Какая процедура строит параллелепипед с заполненной передней гранью? 5. Используя какой прием можно нарисовать «полумесяц»? 6. Нарисовать на экране треугольники при помощи цикла всеми возможными способами. Домашнее задание. 1. Написать программу, чтобы на экране выводился фрагмент тетради в клетку, используя циклические операции.

№ слайда 10
Описание слайда:

Очень низкие цены на курсы переподготовки от Московского учебного центра для педагогов

Специально для учителей, воспитателей и других работников системы образования действуют 65% скидки при обучении на курсах профессиональной переподготовки.

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

Подайте заявку на интересующий Вас курс сейчас: KURSY.ORG


Краткое описание документа:

Uses Graph;      -   подключение графического режима InitGraph(Gd, Gm, 'way');  - переход из текстового режима к графическому

   где   Gd  - имя графического драйвера (параметр-переменная),

             Gm- номер графического режима монитора (параметр-переменная);

          'way' - дорожка DOS к файлам с графическими драйверами.

Для подключения драйверов  в режиме автоопределениязадается Gd:=Detect; или Gd:=0; GetMaxMode; - функция, которая возвращает номер наибольшего режима. GetMaxX; - по оси Х, GetMaxY; - по оси Y. CloseGraph- полное прекращение работы графической системы. RestoreCrtMode; - переключение в текстовый режим с возможностью

возврата к текущим установкам графического режима.

SetBkColor (N);- установить цвет N  для пикселей фона. По умолчанию установлен  черный цвет фона. Setcolor(N); - установить цвет N для выводимых линий. По умолчанию  установлен  белый цвет линий. PutPixel(X, Y, N);  - высветить цветом N пиксель с координатами X, Y FloodFill(X, Y, N) - заполнение замкнутой области с границей цвета N.

 

GetPixel(X, Y); - функция возвращает цвет пикселя с координатами X, Y.

Общая информация

Номер материала: 539890

Похожие материалы