Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Презентации / Презентация к уроку "Pascal Модуль GraphABC"

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

Международный конкурс по математике «Поверь в себя»

для учеников 1-11 классов и дошкольников с ЛЮБЫМ уровнем знаний

Задания конкурса по математике «Поверь в себя» разработаны таким образом, чтобы каждый ученик вне зависимости от уровня подготовки смог проявить себя.

К ОПЛАТЕ ЗА ОДНОГО УЧЕНИКА: ВСЕГО 28 РУБ.

Конкурс проходит полностью дистанционно. Это значит, что ребенок сам решает задания, сидя за своим домашним компьютером (по желанию учителя дети могут решать задания и организованно в компьютерном классе).

Подробнее о конкурсе - https://urokimatematiki.ru/


Идёт приём заявок на самые массовые международные олимпиады проекта "Инфоурок"

Для учителей мы подготовили самые привлекательные условия в русскоязычном интернете:

1. Бесплатные наградные документы с указанием данных образовательной Лицензии и Свидeтельства СМИ;
2. Призовой фонд 1.500.000 рублей для самых активных учителей;
3. До 100 рублей за одного ученика остаётся у учителя (при орг.взносе 150 рублей);
4. Бесплатные путёвки в Турцию (на двоих, всё включено) - розыгрыш среди активных учителей;
5. Бесплатная подписка на месяц на видеоуроки от "Инфоурок" - активным учителям;
6. Благодарность учителю будет выслана на адрес руководителя школы.

Подайте заявку на олимпиаду сейчас - https://infourok.ru/konkurs

  • Информатика
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) - Рисует дугу окружности с центром в точке...
Программа *
Упражнения *
1 из 16

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

№ слайда 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% скидкой при обучении по программам профессиональной переподготовки.

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

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

Начало обучения ближайших групп: 18 января и 25 января. Оплата возможна в беспроцентную рассрочку (20% в начале обучения и 80% в конце обучения)!

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



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

УЖЕ ЧЕРЕЗ 10 МИНУТ ВЫ МОЖЕТЕ ПОЛУЧИТЬ ДИПЛОМ

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

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

Список всех тестов можно посмотреть тут - https://infourok.ru/tests

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

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