Графика в среде Паскаль презентация

Содержание

1. Графика в среде Паскаль
2. Тема урока: Г А Р
3. Тема урока: Г А Р
4. Тема урока: Г А Р
5. Тема урока: Г А Р
6. Тема урока: Г А Р
7. Тема урока: Г А Р
8. Тема урока: Г А Р
9. Тема урока: Г А Р
10. Тема урока: Г А Р
11. Тема урока: Г А Р
12. Тема урока: Г А Р
13. Тема урока: Г А Р
14. Тема урока: Г А Р
15. Тема урока: Г А Р
16. Тема урока: Г А Р
17. Тема урока: Г А Р
18. Тема урока: Г А Р
19. Тема урока: Г А Р
20. Тема урока: Г А Р
21. Тема занятия: * Г А
22. Графический режим
23. Program pr; Uses crt, graph; {использование
24. 0 – черный 1 – синий
25. Установка цвета SetColor(Color:integer); Устанавливает основной цвет рисования
26. MoveTo (x, y); Устанавливает перо в координаты
27. Линия Оператор LINE(X1,Y1,X2,Y2); рисует на экране
28. Прямоугольник Процедура Bar(x1,y1,x2,y2) выводит на
30. Процедура ELLIPSE(x,y,L1,L2,Rx,Ry) рисует эллиптическую дугу
31. Процедура Arc(x,y,L1,L2,r) рисует дугу с
32. Процедура остановки цикла после нажатия любой
33. Программа движения окружности: Program okr; Uses graph,
35. Домашнее задание: Повторение теоретического материала. Как
36. Спасибо за урок!

Тема урока: Г А Р Ф И К А В Р С Е Д Е П А

Слайд 1Г
А
Р
Ф
И
К
А
В
Р
С
Е

Тема урока:

Слайд 2Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 3Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 4Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 5Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 6Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 7Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 8Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 9Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 10Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 11Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 12Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 13Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 14Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 15Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 16Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 17Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 18Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 19Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 20Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 21Тема занятия:
*
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 22Графический режим

Размер экрана 640х480
(0,0)
(640,0)
(0,480)
y

(0,0)

(640,0)

(0,480)

Слайд 23Program pr;
Uses crt, graph; {использование графического режима}
Var driver,

{графический драйвер}
mode:integer; {графический режим}
Begin
Driver:=detect; {автораспознавание драйвера}
Initgraph(driver, mode,’путь к файлу egavga.bgi’);
{операторы и процедуры графических построений}
Readkey;
Closegraph;
End.

Инициализация графического режима

Слайд 24
0 – черный
1 – синий
2 – зеленый
3 – голубой
4 – красный
5

– фиолетовый
6 – коричневый
7 – светло-серый

8 – темно-серый
9 – ярко-синий
10 – ярко-зелёный
11 – ярко-голубой
12 – ярко-красный
13 – ярко-розовый
14 – жёлтый
15 – белый

Номера цветов

Слайд 25Установка цвета
SetColor(Color:integer);
Устанавливает основной цвет рисования
SetBkColor(Color:integer);
Устанавливает текущий фоновый цвет
Например: нарисовать на экране

синего цвета отрезок прямой из точки с координатами(100,50) в точку с координатами(400,300) красного цвета:

SetBkColor(3);
SetColor(4);
LINE(100,50,400,300);

Слайд 26MoveTo (x, y);
Устанавливает перо в координаты (x,y).
PutPixel (x, y, Color);
Рисует точку

с координатами (x,y) цветом Color.
GetPixel (x, y): word;
Возвращает цвет точки с координатами (x,y).
SetLineStyle (Ln, 0, T);
Изменяет параметры контуров. Ln - стиль линии (0..3):
T - толщина линии: 1 = нормальная; 3 = толстая.
SetFillStyle (Type, Color);
Устанавливает тип (0..11) и цвет штриховки замкнутых фигур
ClearDevice;
Очищает графический экран закрашивая его в текущий цвет фона

Слайд 27Линия
Оператор LINE(X1,Y1,X2,Y2); рисует на экране отрезок прямой из точки с

координатами (x1,y1) до точки с координатами (x2,y2).

Слайд 28Прямоугольник
Процедура Bar(x1,y1,x2,y2) выводит на экран закрашенный прямоугольник с координатами

левого верхнего угла (х1,у1) и правого нижнего угла (х2,у2).

Чтобы начертить закрашенную фигуры нужно:

-Установить цвет фигуры:
SETCOLOR(№ цвета);
-Установить цвет и стиль закраски:
SETFILLSTYLE(№ стиля, № цвета);
-Нарисовать фигуру: {название фигуры} (данные нужные для закраски);
-Закрасить фигуру: FLOODFILL(x,y,№ цвета границы);
Где x,y – координаты точки в замкутой области.

Слайд 29

Процедура CIRCLE(x,y,r) выводит на экран окружность с центром (х,у) и радиусом r.

ОКРУЖНОСТЬ

Слайд 30 Процедура ELLIPSE(x,y,L1,L2,Rx,Ry) рисует эллиптическую дугу от начального угла L1

до конечногоL2, используя Х,У как координаты центра, как горизонтальный (Rx) и вертикальный(Ry) радиус.
FillEllipse (x, y, Xr, Yr);
Рисует закрашенный эллипс с центром в (x,y) и радиусами Xr и Yr.

эллипс

Слайд 31 Процедура Arc(x,y,L1,L2,r) рисует дугу с центром в точке (х,у)

от начального угла L1 до конечного L2 радиусом r.

Дуга

Слайд 32
Процедура остановки цикла после нажатия любой клавиши:
KEYPRESSED;
Для обеспечения

задержки выполнения действия используется процедура:

DELAY(n);
где n – это величина (в миллисекундах) необходимой задержки.

Слайд 33Программа движения окружности:
Program okr;
Uses graph, crt;
Var x, y, r: integer;

{ параметры окружности }
dx: integer; { шаг перемещения окружности }
grdriver, grmode: integer; { графический режим }
Begin
Grdriver:=detect;
Initgraph ( grdriver, grmode, ‘ с:/BP/BGI‘ );
X:=0;
Y:=100;
R:=20;
Dx:=2;
Repeat
Setcolor(15);
Circle(x,y,r);
Delay(10000);
Setcolor(0);
Circle(x,y,r);
X:=x+dx;
Until keypressed;
Readln;
Closegraph;
End.

Слайд 34

Слайд 35
Домашнее задание:
Повторение теоретического материала.
Как Выполнить мерцающую разными цветами окружность? Подумать и

записать дополнение к программе.

Слайд 36Спасибо за урок!

Скачать презентацию

Графика в среде Паскаль презентация

Содержание

Слайд 1Г
А
Р
Ф
И
К
А
В
Р
С
Е

Слайд 2Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 3Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 4Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 5Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 6Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 7Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 8Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 9Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 10Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 11Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 12Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 13Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 14Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 15Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 16Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 17Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 18Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 19Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 20Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 21Тема занятия:
*
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 22Графический режим

Размер экрана 640х480
(0,0)
(640,0)
(0,480)
y

Слайд 23Program pr;
Uses crt, graph; {использование графического режима}
Var driver,

Слайд 24
0 – черный
1 – синий
2 – зеленый
3 – голубой
4 – красный
5

Слайд 25Установка цвета
SetColor(Color:integer);
Устанавливает основной цвет рисования
SetBkColor(Color:integer);
Устанавливает текущий фоновый цвет
Например: нарисовать на экране

Слайд 26MoveTo (x, y);
Устанавливает перо в координаты (x,y).
PutPixel (x, y, Color);
Рисует точку

Слайд 27Линия
Оператор LINE(X1,Y1,X2,Y2); рисует на экране отрезок прямой из точки с

Слайд 28Прямоугольник
Процедура Bar(x1,y1,x2,y2) выводит на экран закрашенный прямоугольник с координатами

Слайд 29

Слайд 30 Процедура ELLIPSE(x,y,L1,L2,Rx,Ry) рисует эллиптическую дугу от начального угла L1

Слайд 31 Процедура Arc(x,y,L1,L2,r) рисует дугу с центром в точке (х,у)

Слайд 32
Процедура остановки цикла после нажатия любой клавиши:
KEYPRESSED;
Для обеспечения

Слайд 33Программа движения окружности:
Program okr;
Uses graph, crt;
Var x, y, r: integer;

Слайд 34

Слайд 35
Домашнее задание:
Повторение теоретического материала.
Как Выполнить мерцающую разными цветами окружность? Подумать и

Слайд 36Спасибо за урок!

Обратная связь

Что такое ThePresentation.ru?

Графика в среде Паскаль презентация

Содержание

Слайд 1Г А Р Ф И К А В Р С Е

Слайд 2Тема урока:Г А Р Ф И К А В Р С

Слайд 3Тема урока:Г А Р Ф И К А В Р С

Слайд 4Тема урока:Г А Р Ф И К А В Р С

Слайд 5Тема урока:Г А Р Ф И К А В Р С

Слайд 6Тема урока:Г А Р Ф И К А В Р С

Слайд 7Тема урока:Г А Р Ф И К А В Р С

Слайд 8Тема урока:Г А Р Ф И К А В Р С

Слайд 9Тема урока:Г А Р Ф И К А В Р С

Слайд 10Тема урока:Г А Р Ф И К А В Р С

Слайд 11Тема урока:Г А Р Ф И К А В Р С

Слайд 12Тема урока:Г А Р Ф И К А В Р С

Слайд 13Тема урока:Г А Р Ф И К А В Р С

Слайд 14Тема урока:Г А Р Ф И К А В Р С

Слайд 15Тема урока:Г А Р Ф И К А В Р С

Слайд 16Тема урока:Г А Р Ф И К А В Р С

Слайд 17Тема урока:Г А Р Ф И К А В Р С

Слайд 18Тема урока:Г А Р Ф И К А В Р С

Слайд 19Тема урока:Г А Р Ф И К А В Р С

Слайд 20Тема урока:Г А Р Ф И К А В Р С

Слайд 21Тема занятия:*Г А Р Ф И К А В Р С

Слайд 22Графический режим Размер экрана 640х480 (0,0) (640,0) (0,480) y

Слайд 23Program pr;Uses crt, graph; {использование графического режима}Var driver,

Слайд 240 – черный1 – синий2 – зеленый3 – голубой4 – красный5

Слайд 25Установка цветаSetColor(Color:integer);Устанавливает основной цвет рисованияSetBkColor(Color:integer);Устанавливает текущий фоновый цветНапример: нарисовать на экране

Слайд 26MoveTo (x, y);Устанавливает перо в координаты (x,y).PutPixel (x, y, Color);Рисует точку

Слайд 27ЛинияОператор LINE(X1,Y1,X2,Y2); рисует на экране отрезок прямой из точки с

Слайд 28Прямоугольник Процедура Bar(x1,y1,x2,y2) выводит на экран закрашенный прямоугольник с координатами

Слайд 29

Слайд 30 Процедура ELLIPSE(x,y,L1,L2,Rx,Ry) рисует эллиптическую дугу от начального угла L1

Слайд 31 Процедура Arc(x,y,L1,L2,r) рисует дугу с центром в точке (х,у)

Слайд 32Процедура остановки цикла после нажатия любой клавиши: KEYPRESSED;Для обеспечения

Слайд 33Программа движения окружности:Program okr;Uses graph, crt;Var x, y, r: integer;

Слайд 34

Слайд 35Домашнее задание:Повторение теоретического материала.Как Выполнить мерцающую разными цветами окружность? Подумать и

Слайд 36Спасибо за урок!

Похожие презентации

Обратная связь

Что такое ThePresentation.ru?

Слайд 1Г
А
Р
Ф
И
К
А
В
Р
С
Е

Слайд 2Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 3Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 4Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 5Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 6Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 7Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 8Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 9Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 10Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 11Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 12Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 13Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 14Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 15Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 16Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 17Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 18Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 19Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 20Тема урока:
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 21Тема занятия:
*
Г
А
Р
Ф
И
К
А
В
Р
С

Слайд 22Графический режим

Размер экрана 640х480
(0,0)
(640,0)
(0,480)
y

Слайд 23Program pr;
Uses crt, graph; {использование графического режима}
Var driver,

Слайд 24
0 – черный
1 – синий
2 – зеленый
3 – голубой
4 – красный
5

Слайд 25Установка цвета
SetColor(Color:integer);
Устанавливает основной цвет рисования
SetBkColor(Color:integer);
Устанавливает текущий фоновый цвет
Например: нарисовать на экране

Слайд 26MoveTo (x, y);
Устанавливает перо в координаты (x,y).
PutPixel (x, y, Color);
Рисует точку

Слайд 27Линия
Оператор LINE(X1,Y1,X2,Y2); рисует на экране отрезок прямой из точки с

Слайд 28Прямоугольник
Процедура Bar(x1,y1,x2,y2) выводит на экран закрашенный прямоугольник с координатами

Слайд 32
Процедура остановки цикла после нажатия любой клавиши:
KEYPRESSED;
Для обеспечения

Слайд 33Программа движения окружности:
Program okr;
Uses graph, crt;
Var x, y, r: integer;

Слайд 35
Домашнее задание:
Повторение теоретического материала.
Как Выполнить мерцающую разными цветами окружность? Подумать и