1187953
столько раз учителя, ученики и родители
посетили официальный сайт проекта «Инфоурок»
за прошедшие 24 часа
Добавить материал и получить бесплатное
свидетельство о публикации
в СМИ №ФС77-60625 от 20.01.2015
Инфоурок Информатика ПрезентацииПрезентация по информатике на тему Введение в графику в языке программирования Turbo Pascal

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

IV Международный дистанционный конкурс «Старт» Идёт приём заявок Для дошкольников и учеников 1-11 классов 16 предметов ОРГВЗНОС 25 Р. ПОДАТЬ ЗАЯВКУ
библиотека
материалов
Урок по теме: «Введение в графику в языке программирования Turbo Pascal» Авто...

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

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 слайд
Описание слайда:

Курс профессиональной переподготовки
Учитель информатики
Курс профессиональной переподготовки
Учитель математики и информатики
Найдите материал к любому уроку,
указав свой предмет (категорию), класс, учебник и тему:
также Вы можете выбрать тип материала:
Краткое описание документа:

•Uses Graph; - подключение графического режима

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

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

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

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

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

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

ВНИМАНИЮ УЧИТЕЛЕЙ: хотите организовать и вести кружок по ментальной арифметике в своей школе? Спрос на данную методику постоянно растёт, а Вам для её освоения достаточно будет пройти один курс повышения квалификации (72 часа) прямо в Вашем личном кабинете на сайте "Инфоурок".

Пройдя курс Вы получите:
- Удостоверение о повышении квалификации;
- Подробный план уроков (150 стр.);
- Задачник для обучающихся (83 стр.);
- Вводную тетрадь «Знакомство со счетами и правилами»;
- БЕСПЛАТНЫЙ доступ к CRM-системе, Личному кабинету для проведения занятий;
- Возможность дополнительного источника дохода (до 60.000 руб. в месяц)!

Пройдите дистанционный курс «Ментальная арифметика» на проекте "Инфоурок"!

Подать заявку
26-28 октября 2019 I МЕЖДУНАРОДНЫЙ ПЕДАГОГИЧЕСКИЙ «ИНФОФОРУМ» «Современные тенденции в воспитании и социализации детей» Подать заявку Очное участие Дистанционное участие Курс повышения квалификации (36 часов) + Сертификат участника “Инфофорума”
IV Международный дистанционный конкурс «Старт» Для дошкольников и учеников 1-11 классов Рекордно низкий оргвзнос 25 Р. 16 предметов ПОДАТЬ ЗАЯВКУ

Вам будут интересны эти курсы:

Курс повышения квалификации «Информационные технологии в деятельности учителя физики»
Курс повышения квалификации «Облачные технологии в образовании»
Курс повышения квалификации «Сетевые и дистанционные (электронные) формы обучения в условиях реализации ФГОС по ТОП-50»
Курс профессиональной переподготовки «Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»
Курс повышения квалификации «Применение MS Word, Excel в финансовых расчетах»
Курс профессиональной переподготовки «Управление в сфере информационных технологий в образовательной организации»
Курс профессиональной переподготовки «Математика и информатика: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Применение интерактивных образовательных платформ на примере платформы Moodle»
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.