Инфоурок / Информатика / Презентации / Презентация "Графика в Pascal" 7 класс

Презентация "Графика в Pascal" 7 класс

библиотека
материалов
Графика в Pascal
Для того, чтобы использовать его графические средства нужно подключить графич...
Отрезок рисуется процедурой Line. Мы знаем, что отрезок прямой можно построит...
Rectangle(150,150,50,200); Прямоугольник рисуется процедурой Rectangle где в...
Для закрашивании фигур используют цветовые константы const h= clRed; d = clG...
USES 	GraphABC; const h= clRed; d=clGreen; var l,t,s: integer; BEGIN SetWindo...
Составить программу рисующую красный квадрат в центре формы и две горизонтал...
ClearWindow; - очищает графическое окно белым цветом. ClearWindow(color); -...
Цвет линии SetPenColor(color) - устанавливает цвет пера, задаваемый параметр...
Толщина линии SetPenWidth(n) - устанавливает ширину (толщину) пера, равную n...
11 1

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

№ слайда 1 Графика в Pascal
Описание слайда:

Графика в Pascal

№ слайда 2 Для того, чтобы использовать его графические средства нужно подключить графич
Описание слайда:

Для того, чтобы использовать его графические средства нужно подключить графический модуль. uses GraphABC функция подключения графического модуля записывается перед объявлением переменных uses GraphABC; var v,k: integer; begin

№ слайда 3 Отрезок рисуется процедурой Line. Мы знаем, что отрезок прямой можно построит
Описание слайда:

Отрезок рисуется процедурой Line. Мы знаем, что отрезок прямой можно построить, если известно положение его двух крайних точек. Они-то и задаются в обращении к процедуре. Первая пара параметров - координаты одной точки (любой из двух), вторая пара - другой. Line(100,50,250,150); Окружность можно построить, если известно положение центра и радиус. Окружность рисуется процедурой Circle, первые два параметра которой - координаты центра, третий - радиус. Circle(200,100,50);

№ слайда 4 Rectangle(150,150,50,200); Прямоугольник рисуется процедурой Rectangle где в
Описание слайда:

Rectangle(150,150,50,200); Прямоугольник рисуется процедурой Rectangle где в параметрах указывают Координаты правый верхний и левый нижний углы SetWindowPos(x,y); // Устанавливает позицию графического окна. SetWindowWidth (500); //Устанавливает ширину графического окна SetWindowHeight(100); //Устанавливает высоту графического окна.

№ слайда 5 Для закрашивании фигур используют цветовые константы const h= clRed; d = clG
Описание слайда:

Для закрашивании фигур используют цветовые константы const h= clRed; d = clGreen; В программе используют процедуру SetBrushColor(h ); ее записывают перед фигурой которую надо закрасить

№ слайда 6 USES 	GraphABC; const h= clRed; d=clGreen; var l,t,s: integer; BEGIN SetWindo
Описание слайда:

USES GraphABC; const h= clRed; d=clGreen; var l,t,s: integer; BEGIN SetWindowWidth(500); //Устанавливает высоту графического окна SetWindowHeight(500); //Устанавливает ширину графического окна. SetWindowPos(0,0); // Устанавливает позицию графического окна. SetBrushColor(h ); Rectangle(150,150,50,200); //правый верхний и левый нижний углы} SetBrushColor(d ); Circle(200,100,50); {окружность} Line(100,50,250,150); {отрезок прямой} ReadLn; END.

№ слайда 7 Составить программу рисующую красный квадрат в центре формы и две горизонтал
Описание слайда:

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

№ слайда 8 ClearWindow; - очищает графическое окно белым цветом. ClearWindow(color); -
Описание слайда:

ClearWindow; - очищает графическое окно белым цветом. ClearWindow(color); - очищает графическое окно указанным цветом. Очистка графического окна uses GraphABC; begin ClearWindow; ClearWindow(clMoneyGreen); end. Цвет зеленых денег

№ слайда 9 Цвет линии SetPenColor(color) - устанавливает цвет пера, задаваемый параметр
Описание слайда:

Цвет линии SetPenColor(color) - устанавливает цвет пера, задаваемый параметром color. Program liniay; uses GraphABC; begin setpencolor(clred); line(30,30,400,350); end.

№ слайда 10 Толщина линии SetPenWidth(n) - устанавливает ширину (толщину) пера, равную n
Описание слайда:

Толщина линии SetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям. Program liniay; uses GraphABC; begin setpenwidth(20); setpencolor(clred); line(30,30,400,350); end.

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

Только до конца зимы! Скидка 60% для педагогов на ДИПЛОМЫ от Столичного учебного центра!

Курсы профессиональной переподготовки и повышения квалификации от 1 400 руб.
Для выбора курса воспользуйтесь удобным поиском на сайте KURSY.ORG


Вы получите официальный Диплом или Удостоверение установленного образца в соответствии с требованиями государства (образовательная Лицензия № 038767 выдана ООО "Столичный учебный центр" Департаментом образования города МОСКВЫ).

Московские документы для аттестации: KURSY.ORG


Краткое описание документа:

 

Для того, чтобы использовать его графические средства  нужно подключить графический модуль.

uses GraphABC функция подключения графического модуля записывается перед объявлением переменных.

Отрезокрисуется процедурой Line. Мы знаем, что отрезок прямой можно построить, если известно положение его двух крайних точек. Они-то и задаются в обращении к процедуре. Первая пара параметров - координаты одной точки (любой из двух), вторая пара - другой.

Окружностьможно построить, если известно положение центра и радиус. Окружность рисуется процедурой Circle, первые два параметра которой - координаты центра, третий - радиус.

 

Прямоугольник  рисуется процедурой Rectangle

 

 где в параметрах указывают

 

Координаты  правый верхний и левый нижний углы.

 

 

     Для закрашивании фигур  используют цветовые константы

 

const  h=  clRed;d=clGreen;

 

 

 

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

Номер материала: 116701

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