Инфоурок / Информатика / Презентации / Презентация "Графика на языке программирования Pascal ABC"
Обращаем Ваше внимание, что в соответствии с Федеральным законом N 273-ФЗ «Об образовании в Российской Федерации» в организациях, осуществляющих образовательную деятельность, организовывается обучение и воспитание обучающихся с ОВЗ как совместно с другими обучающимися, так и в отдельных классах или группах.

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

Только сейчас Вы можете пройти дистанционное обучение прямо на сайте "Инфоурок" со скидкой 40% по курсу повышения квалификации "Организация работы с обучающимися с ограниченными возможностями здоровья (ОВЗ)" (72 часа). По окончании курса Вы получите печатное удостоверение о повышении квалификации установленного образца (доставка удостоверения бесплатна).

Автор курса: Логинова Наталья Геннадьевна, кандидат педагогических наук, учитель высшей категории. Начало обучения новой группы: 27 сентября.

Подать заявку на этот курс    Смотреть список всех 216 курсов со скидкой 40%

Презентация "Графика на языке программирования Pascal ABC"

библиотека
материалов
Графика на языке программирования Pascal ABC
Модуль GRAPH ABC
Uses GraphABC; Подключение модуля
В графическом режиме весь экран разбивается на отдельные точки — "пиксели"....
Описание некоторых основных графических процедур и функций SetPixel(x,y,color...
Цвета в PascalABC
Пример графической программы, рисующей изображение дома: Program Domik; uses...
Программа, рисующая фигурку: Program Figurka; uses GraphABC; begin SetWindowS...
Практическая работа за компьютером Определите координаты и составьте программ...
Программа будет иметь вид: Program domik_2; uses GraphABC; var i: integer; st...
Домашнее задание Используя оператор цикла и введя переменную для пересчета ко...
13 1

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

№ слайда 1 Графика на языке программирования Pascal ABC
Описание слайда:

Графика на языке программирования Pascal ABC

№ слайда 2 Модуль GRAPH ABC
Описание слайда:

Модуль GRAPH ABC

№ слайда 3 Uses GraphABC; Подключение модуля
Описание слайда:

Uses GraphABC; Подключение модуля

№ слайда 4 В графическом режиме весь экран разбивается на отдельные точки — "пиксели".
Описание слайда:

В графическом режиме весь экран разбивается на отдельные точки — "пиксели". Положение пикселя также задается двумя координатами — X и Y. Координата X увеличивается слева направо, а координата Y — сверху вниз. Графический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали. (0,0) (640,0) (640,400) (0,400)

№ слайда 5 Описание некоторых основных графических процедур и функций SetPixel(x,y,color
Описание слайда:

Описание некоторых основных графических процедур и функций SetPixel(x,y,color) - закрашивает один пиксел с координатами (x,y) цветом color. Line(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом в точке (x2,y2). SetPenColor(color) - устанавливает цвет пера, задаваемый параметром color. SetPenStyle(<номер от 1 до 6>); - устанавливает стиль пера, задаваемый номером. SetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям. Треугольник рисуется процедурами Line(x1,y1,x2,y2); Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2). FloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с точки (x,y). сircle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r. Ellipse(x1,y1,x2,y2) - рисует эллипс, заданный своим описанным прямоугольником с координатами противоположных вершин (x1,y1) и (x2,y2).

№ слайда 6 Цвета в PascalABC
Описание слайда:

Цвета в PascalABC

№ слайда 7 Пример графической программы, рисующей изображение дома: Program Domik; uses
Описание слайда:

Пример графической программы, рисующей изображение дома: Program Domik; uses Graphabc; //подключение модуля GraphABC begin SetWindowWidth(800); //ширина окна программы SetWindowHeight(600); //высота окна программы SetPenWidth(3); //толщина пера SetFontSize(18); //размер шрифта SetFontColor(clRed); //цвет шрифта SetFontStyle(fsBold); //жирный стиль шрифта TextOut(100,100,'Домик'); //текст Rectangle(200, 300, 600,600); //дом Circle(400,225, 40); //круг SetBrushColor(clAqua); //цвет заливки окна FillRect(300, 400,500,500); //процедура заливки окна rectangle(300,400,500,500); //окно Line(400,400,400,500); // окно Line(300,450,500,450); //окно Line(200,300,400,150); //крыша Line(400,150,600,300); //крыша Line(480,210,480,160); //труба Line(480,160,520,160); //труба Line(520,160,520,240); //труба end.

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

№ слайда 9 Программа, рисующая фигурку: Program Figurka; uses GraphABC; begin SetWindowS
Описание слайда:

Программа, рисующая фигурку: Program Figurka; uses GraphABC; begin SetWindowSize(500, 500); //задаем размер графического окна SetPenWidth(3); //устанавливаем стиль пера SetBrushColor(clFuchsia); //устанавливаем цвет кисти Circle(225,160,50); //рисуем окружность Line(225,160,225,180); //рисуем линии Line( 210,190,240,190); Line( 225,210,225,250); Line( 100,100,200,260); Line( 200,260,400,260); Line( 210,350,200,480); Line(240,350,250,480); Rectangle(200,230,250,350); //рисуем прямоугольник SetBrushColor(clLime); FillRect(0, 480,500,500); //рисуем закрашенный прямоугольник SetBrushColor(clWhite); Circle(205,150,10); Circle(245,150,10); end.

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

№ слайда 11 Практическая работа за компьютером Определите координаты и составьте программ
Описание слайда:

Практическая работа за компьютером Определите координаты и составьте программу, выводящую на экран рисунок  дома и дерева.  

№ слайда 12 Программа будет иметь вид: Program domik_2; uses GraphABC; var i: integer; st
Описание слайда:

Программа будет иметь вид: Program domik_2; uses GraphABC; var i: integer; st:string; begin SetWindowSize(500, 500); {Коричневая стена} SetPenWidth(2); SetBrushColor(clBrown); FillRect(100,50,150,100); {Крыша желтого цвета} SetPenColor(clBrown); Line(125,25,80,75); Line(125,25,170,75); FloodFill(125, 30,clYellow); {Крона дерева} SetPenColor(clGreen); SetBrushColor(clGreen); Ellipse(100,150,150,200); {ствол дерева} SetBrushColor(clBrown); FillRect(120,200,130,230); end.

№ слайда 13 Домашнее задание Используя оператор цикла и введя переменную для пересчета ко
Описание слайда:

Домашнее задание Используя оператор цикла и введя переменную для пересчета координат по оси  x, постройте “поселок”, состоящий из 3 домов. Внесите соответствующие дополнения и изменения в предыдущую программу.



Самые низкие цены на курсы переподготовки

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

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

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

Начало обучения ближайшей группы: 27 сентября. Оплата возможна в беспроцентную рассрочку (10% в начале обучения и 90% в конце обучения)!

Подайте заявку на интересующий Вас курс сейчас: https://infourok.ru

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

Номер материала: ДБ-331739

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

2017 год объявлен годом экологии и особо охраняемых природных территорий в Российской Федерации. Министерство образования и науки рекомендует в 2017/2018 учебном году включать в программы воспитания и социализации образовательные события, приуроченные к году экологии.

Учителям 1-11 классов и воспитателям дошкольных ОУ вместе с ребятами рекомендуем принять участие в международном конкурсе «Законы экологии», приуроченном к году экологии. Участники конкурса проверят свои знания правил поведения на природе, узнают интересные факты о животных и растениях, занесённых в Красную книгу России. Все ученики будут награждены красочными наградными материалами, а учителя получат бесплатные свидетельства о подготовке участников и призёров международного конкурса.

Конкурс "Законы экологии"