Презентация на тему Графика в Pascal


Здесь Вы можете скачать готовую презентацию на тему Графика в Pascal. Предмет презентации: Информатика. Красочные слайды и илюстрации помогут вам заинтересовать своих одноклассников или аудиторию. Для просмотра содержимого презентации воспользуйтесь плеером, или если вы хотите скачать презентацию - нажмите на соответствующий текст под плеером. Презентация содержит 28 слайдов.

Слайды презентации

Слайд 2
 Задание графического режима  Линия  Прямоугольник  Окружность  Эллипс  Дуга  выход Тест №2 Тест № 1 содержание
Слайд 3
Для вывода графических изображений на экран монитора в языке Pascal существует стандартная библиотека Graph, подключение которой осуществляется стандартным способом uses Graph ; В графическом режиме работы любое изображение на экране дисплея состоит из множества мельчайших светящихся точек – пикселей. Экран дисплея представляет собой прямоугольную сетку координат.
Слайд 4
Графический режим Графический режим
Слайд 5
Program pr; Uses crt, graph; { использование графического режима } Var driver, { графический драйвер } mode:integer; { графический режим } Begin Driver:=detect; { автораспознавание драйвера } Initgraph(driver, mode,’ путь к файлу egavga.bgi’); { операторы и процедуры графических построений } Readkey; Closegraph; End. Инициализация графического режима Инициализация графического режима
Слайд 6
0 – черный 1 – синий 2 – зеленый 3 – голубой 4 – красный 5 – фиолетовый 6 – коричневый 7 – светло-серый 8 – темно-серый 9 – ярко-синий 10 – ярко-зелёный 11 – ярко-голубой 12 – ярко-красный 13 – ярко-розовый 14 – жёлтый 15 – белый
Слайд 8
Линия Линия Оператор LINE(X1,Y1,X2,Y2); рисует на экране отрезок прямой из точки с координатами (x1,y1) до точки с координатами (x2,y2) .
Слайд 9
Установка цвета Установка цвета              SetColor(Color:integer); Устанавливает основной цвет рисования SetBkColor(Color:integer); Устанавливает текущий фоновый цвет Н а п р и м е р : н а р и с о в а т ь н а э к р а н е с и н е г о ц в е т а о т р е з о к п р я м о й и з т о ч к и с к о о р д и н а т а м и ( 1 0 0 , 5 0 ) в т о ч к у с к о о р д и н а т а м и ( 4 0 0 , 3 0 0 ) к р а с н о г о ц в е т а : SetBkColor( 1 ); SetColor( 4 ); LINE( 100 , 50 , 400,300 ); •
Слайд 10
Прямоугольник Прямоугольник Процедура Bar(x1,y1,x2,y2) выводит на экран закрашенный прямоугольник с координатами левого верхнего угла (х1,у1) и правого нижнего угла (х2,у2).    Чтобы начертить закрашенную фигуры нужно:   -Установить цвет фигуры : SETCOLOR ( № цвета) ; -Установить цвет и стиль закраски : SETFILLSTYLE ( № стиля, № цвета) ; -Нарисовать фигуру : { название фигуры } ( данные нужные для закраски) ; -Закрасить фигуру : FLOODFILL (x,y, № цвета границы) ; Где x,y – координаты точки в замкутой области.
Слайд 11
Процедура CIRCLE(x,y,r) выводит на экран окружность с центром (х,у) и радиусом r .
Слайд 12
Процедура ELLIPSE(x,y,L1,L2,Rx,Ry) рисует эллиптическую дугу от начального угла L1 до конечного L2 , используя Х,У как координаты центра, как горизонтальный ( Rx ) и вертикальный( Ry ) радиус.
Слайд 13
Процедура Arc(x,y,L1,L2,r) рисует дугу с центром в точке (х,у) от начального угла L1 до конечного L2 радиусом r .
Слайд 14
Примеры решения задач: Примеры решения задач: • Нарисовать квадраты, стороны которых увеличиваются от 20 до 400 ppi , с шагом 20 ppi . Центр экрана совпадает с центром квадрата. Цвет квадратов задаётся случайным числом. Для решения задачи используется цикл с постусловием. Забавные квадраты Забавные квадраты
Слайд 15
Текст программы Текст программы
Слайд 16
• Нарисовать окружности, кол-во которых задается пользователем. Центр, радиус и цвет окружностей задаётся случайным числом. Воздушные пузыри Воздушные пузыри
Слайд 17
Текст программы Текст программы
Слайд 18
Звезда Звезда • Нарисовать звезду прямыми линиями. начало Рисуем отрезок setcolor(15); line(200,40,300,180); Рисуем отрезок setcolor(15); line(180,80,200,140); Рисуем отрезок setcolor(15); line(300,80,320,140); … конец
Слайд 19
Текст программы Текст программы
Слайд 20
Цветок Цветок • Нарисовать цветок используя оператор Ellipse. начало Задаем цвет лепесткам setcolor(1 4 ); конец Рисуем лепестки Ellipse(100,300,0,180,25,20); Ellipse(100,300,0,180,25,20); Ellipse(100,300,0,180,25,20); Ellipse(100,300,0,180,25,20); Задаем цвет цветку setcolor(1 4 ); Рисуем середину цветка circle(100,50,15);
Слайд 21
Тест программы Тест программы
Слайд 22
Робот Робот • Нарисовать робота из разноцветных прямоугольников. начало Рисуем туловище: setfillStyle(1,11); Bar(200,40,300,180); Рисуем голову setfillStyle(1, 15 ); Bar(180,80,200,140); Рисуем глаз setfillStyle(1, 14 ); Bar(300,80,320,140); … коне ц
Слайд 23
Текст программы Текст программы
Слайд 24
Снеговик Снеговик • Нарисовать снеговик одними разноцветными окружностями.
Слайд 25
Текст программы Текст программы
Слайд 26
Колобок Колобок • Нарисовать колобка одними разноцветными эллипсами. начал о Рисуем овал колобка Рисуем рот коне ц Рисуем правый глаз Рисуем нос Рисуем левый глаз
Слайд 27
Текст программы Текст программы
Слайд 28
1.Задание графического режима……………………...3 2.Линия…………………………………………………...8 3.Прямоугольник……………………………………....10 4.Окружность………………………………………….11 5.Эллипс…………………………………………...…….12 6. Дуга……………………………...…………………….13 7.Примеры решения задач……………………………14 • Забавные квадраты…………………… - • Воздушные пузыри……………………...16 • Звезда……………………………………...18 • Цветок………...……………………….....20 • Робот……………………………………..22 • Снеговик…………………………………..24 • Колобок.......................................................26  Тест №2 Тест № 1

Другие презентации по информатике



  • Яндекс.Метрика
  • Рейтинг@Mail.ru