Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Свидетельство о публикации

Автоматическая выдача свидетельства о публикации в официальном СМИ сразу после добавления материала на сайт - Бесплатно

Добавить свой материал

За каждый опубликованный материал Вы получите бесплатное свидетельство о публикации от проекта «Инфоурок»

(Свидетельство о регистрации СМИ: Эл №ФС77-60625 от 20.01.2015)

Инфоурок / Информатика / Презентации / Презентация к уроку "Pascal Модуль GraphABC"
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 28 июня.

Подать заявку на курс
  • Информатика

Презентация к уроку "Pascal Модуль GraphABC"

библиотека
материалов
Pascal Модуль GraphABC Урок 1 *
Подключение дополнительных библиотек Для работы в графическом режиме необходи...
* Графический режим Графический экран PasсalABC (по умолчанию) содержит 640 т...
* Управление экраном SetWindowWidth(w) - Устанавливает ширину графического ок...
* Графические примитивы Точка Линия Прямоугольник Окружность Эллипс Сектор Дуга
* Точка SetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цв...
* Линии Line(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом...
* Используемые цвета Random(16777215) – случайный цвет из всей палитры цветов...
* Цвет линии SetPenColor(color) - устанавливает цвет пера, задаваемый парамет...
* Прямоугольник Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный коорд...
* Заливка цветом FloodFill(x,y,color) - заливает область одного цвета цветом...
* Program treugolnik; uses GraphABC; begin setpenwidth(20); setpencolor(clred...
* Circle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r. Окр...
* Дуга окружности Arc(x,y,r,a1,a2) - Рисует дугу окружности с центром в точке...
Программа *
Упражнения *
16 1

Подайте заявку сейчас на любой интересующий Вас курс переподготовки, чтобы получить диплом со скидкой 50% уже осенью 2017 года.


Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

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

№ слайда 1 Pascal Модуль GraphABC Урок 1 *
Описание слайда:

Pascal Модуль GraphABC Урок 1 *

№ слайда 2 Подключение дополнительных библиотек Для работы в графическом режиме необходи
Описание слайда:

Подключение дополнительных библиотек Для работы в графическом режиме необходимо подключение модуля GraphABC. Uses GraphABC; Для работы с текстом - модуль Crt. Uses Crt; program …; uses crt, GraphABC; var …; begin … end. *

№ слайда 3 * Графический режим Графический экран PasсalABC (по умолчанию) содержит 640 т
Описание слайда:

* Графический режим Графический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали. 640 точек 400 точек Начало отсчета – левый верхний угол экрана

№ слайда 4 * Управление экраном SetWindowWidth(w) - Устанавливает ширину графического ок
Описание слайда:

* Управление экраном SetWindowWidth(w) - Устанавливает ширину графического окна; SetWindowHeight(h) - Устанавливает высоту графического окна;

№ слайда 5 * Графические примитивы Точка Линия Прямоугольник Окружность Эллипс Сектор Дуга
Описание слайда:

* Графические примитивы Точка Линия Прямоугольник Окружность Эллипс Сектор Дуга

№ слайда 6 * Точка SetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цв
Описание слайда:

* Точка SetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цветом color program tochka; uses GraphABC; begin SetPixel(300,200,clred); end.

№ слайда 7 * Линии Line(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом
Описание слайда:

* Линии Line(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом в точке (x2,y2). Program liniay; uses GraphABC; begin line(100,50,500,250); end.

№ слайда 8 * Используемые цвета Random(16777215) – случайный цвет из всей палитры цветов
Описание слайда:

* Используемые цвета Random(16777215) – случайный цвет из всей палитры цветов Паскаля clBlack – черный clPurple – фиолетовый clWhite – белый clMaroon – темно-красный clRed – красный clNavy – темно-синий clGreen – зеленый clBrown – коричневый clBlue – синий clSkyBlue – голубой clYellow – желтый clCream – кремовый clAqua – бирюзовый clOlive – оливковый clFuchsia – сиреневый clTeal – сине-зеленый clGray – темно-серый clLime – ярко-зеленый clMoneyGreen – цвет зеленых денег clLtGray – светло-серый clDkGray – темно-серый clMedGray – серый clSilver – серебряный

№ слайда 9 * Цвет линии SetPenColor(color) - устанавливает цвет пера, задаваемый парамет
Описание слайда:

* Цвет линии SetPenColor(color) - устанавливает цвет пера, задаваемый параметром color. Program liniay; uses GraphABC; begin setpencolor(clred); line(30,30,400,350); end.

№ слайда 10 * Прямоугольник Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный коорд
Описание слайда:

* Прямоугольник Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2). Program pryamougolnik; uses GraphABC; begin Rectangle(50,50,200,200); end.

№ слайда 11 * Заливка цветом FloodFill(x,y,color) - заливает область одного цвета цветом
Описание слайда:

* Заливка цветом FloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с точки (x,y). Program pryamougolnik; uses GraphABC; begin Rectangle(50,50,200,200); FloodFill(100,100,clBlue); end.

№ слайда 12 * Program treugolnik; uses GraphABC; begin setpenwidth(20); setpencolor(clred
Описание слайда:

* Program treugolnik; uses GraphABC; begin setpenwidth(20); setpencolor(clred); line(300,100,500,300); lineto(100,300); lineto(300,100); floodfill(300,200,clgreen); end. Треугольник Рисуется процедурами Line(x1,y1,x2,y2); LineTo(x,y);

№ слайда 13 * Circle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r. Окр
Описание слайда:

* Circle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r. Окружность Program circle; uses GraphABC; begin Circle(500,200,100); FloodFill(500,200,clred); end. x1,y1 r

№ слайда 14 * Дуга окружности Arc(x,y,r,a1,a2) - Рисует дугу окружности с центром в точке
Описание слайда:

* Дуга окружности Arc(x,y,r,a1,a2) - Рисует дугу окружности с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки). Program duga; uses GraphABC; Begin SetPenWidth(10); Arc(300,250,150,45,135); end. x,y r

№ слайда 15 Программа *
Описание слайда:

Программа *

№ слайда 16 Упражнения *
Описание слайда:

Упражнения *


Подайте заявку сейчас на любой интересующий Вас курс переподготовки, чтобы получить диплом со скидкой 50% уже осенью 2017 года.


Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Автор
Дата добавления 18.08.2016
Раздел Информатика
Подраздел Презентации
Просмотров194
Номер материала ДБ-159628
Получить свидетельство о публикации
Похожие материалы

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