Практическая работа №30 Тема: Построение сектора окружности.

Сборник практических работ по программированию в Паскале Практическая работа №30 Тема: Задача №27  «Семицветик» Цель:  Закрепить понятия: «координатная плоскость».  Изучить графические процедуры для построения геометрических фигур: сектор окружности.  Продолжить формировать умения и навыки инициализации экрана для вывода графических объектов;  выработать навыки составления программ, реализующих вывод  геометрических фигур на экран. ПРОЦЕДУРЫ ДЛЯ ПОСТРОЕНИЯ ГЕОМЕТРИЧЕСКИХ ОБЪЕКТОВ Chord (x,y,r,a1,a2) ­ рисует фигуру, ограниченную дугой окружности и отрезком, соединяющим ее концы. Рассмотрим задачу №27 «Семицветик» Условие задачи: Написать текст программы, используя графические процедуры построения геометрических фигур для вывода на экран рисунка 1. Решение задачи: 1. Постройте рисунок в координатной плоскости. Алгоритм построения: 1) Постройте в тетради координатную плоскость 2) Выберите масштаб – две клетки  ­ 50. 3) Нанесите измерения на координатные оси. 4) Нарисуйте рисунок 1  в координатной плоскости. 2. Напишите текст программы: Используемые процедуры: 1) Chord(x,y,r,a1,a2) ­ рисует фигуру, ограниченную дугой окружности и отрезком. 2) SetPenColor (color)  ­ цвет пера.  3) SetPenWidth (w) – ширина пера.  4) FloodFill(x,y,color) –для заливки внутренней области. Программа: SetPenColor(clGreen); SetPenWidth (3); Chord(200,200,150,0,90); FloodFill(300,125,clBlue); SetPenColor(clGreen); SetPenWidth (3); Chord(350,50,150,180,270); FloodFill(250,125,clBlue); SetPenColor(clGreen); SetPenWidth (3); Chord(200,200,150,270,360); FloodFill(300,275,clRed); SetPenColor(clGreen); SetPenWidth (3); Chord(350,350,150,90,180); FloodFill(250,275,clRed); SetPenColor(clGreen); SetPenWidth (3); Chord(500,200,150,90,180); FloodFill(400,125,clSkyBlue); SetPenColor(clGreen); SetPenWidth (3); Chord(350,50,150,270,360); FloodFill(450,125,clSkyBlue); SetPenColor(clGreen); SetPenWidth (3); Chord(500,200,150,180,270); FloodFill(400,275,clAqua); SetPenColor(clGreen); SetPenWidth (3); Chord(350,350,150,360,90); FloodFill(450,275,clAqua); Circle(350,200,25); FloodFill(350,200,clYellow); END. Задания 1) Запустить программу Pascal ABC. Ввести программу Z27 .  2) Выполнить программу. Сохраните программу в файле. 3) Дописать программу (дорисовать цветок (стебель и листочки, рисунок 2).  4) Выполнить программу. Сохраните программу в файле. Дополнительные задания 5) Создать новый файл. 6) Составить программу, выводящую на экран  изображения: будильник (рисунок 3), кружка (рисунок 4), грибок (рисунок 5), карандаш (рисунок 6).  Рисунок 1 Рисунок 2 Миронова С.П., КГУ «ОСШ. №3 им. Ю.А. Гагарина» Страница 1 Сборник практических работ по программированию в Паскале Рисунок 3 Рисунок 4 Рисунок 5 Рисунок 6 Миронова С.П., КГУ «ОСШ. №3 им. Ю.А. Гагарина» Страница 2