Кризис
<<  Жизненный цикл и фазы проекта Графика в циклах  >>
Цикл и графика
Цикл и графика
Система графических координат компьютера
Система графических координат компьютера
Модули GraphABC и CRT
Модули GraphABC и CRT
Подключение библиотек CRT и GRAPH к программе осуществляется с помощью
Подключение библиотек CRT и GRAPH к программе осуществляется с помощью
Line (x1,y1,x2,y2); Рисует отрезок с началом в точке (x1,y1) и концом
Line (x1,y1,x2,y2); Рисует отрезок с началом в точке (x1,y1) и концом
Circle(x,y,r); Рисует окружность с центром в точке (x,y) и радиусом r
Circle(x,y,r); Рисует окружность с центром в точке (x,y) и радиусом r
Arc(x,y,r,a1,a2); Рисует дугу окружности с центром в точке (x,y) и
Arc(x,y,r,a1,a2); Рисует дугу окружности с центром в точке (x,y) и
SetPenColor (color); Устанавливает цвет пера, задаваемый параметром
SetPenColor (color); Устанавливает цвет пера, задаваемый параметром
При решении многих задач программирования графики возникает
При решении многих задач программирования графики возникает
Линии в ряд
Линии в ряд
Программа «Линии в ряд»
Программа «Линии в ряд»
Линии в ряд (вариант)
Линии в ряд (вариант)
Волна
Волна
Мишень
Мишень
program mishen; uses GraphABC, crt; var i,r,c:integer; begin r:= 105;
program mishen; uses GraphABC, crt; var i,r,c:integer; begin r:= 105;
Сетка
Сетка
program setka; uses GraphABC, crt; var i,x,y,x1,y1:integer; begin
program setka; uses GraphABC, crt; var i,x,y,x1,y1:integer; begin
Продолжение «Сетка»
Продолжение «Сетка»
Зонт
Зонт
program zont; uses GraphABC, crt; var i,x,y:integer; begin
program zont; uses GraphABC, crt; var i,x,y:integer; begin

Презентация на тему: «Цикл и графика». Автор: Маликов. Файл: «Цикл и графика.ppt». Размер zip-архива: 110 КБ.

Цикл и графика

содержание презентации «Цикл и графика.ppt»
СлайдТекст
1 Цикл и графика

Цикл и графика

Программирование графики в среде Pascal ABC

© Маликов Владимир Евгеньевич, учитель информатики МБОУ «Гимназия №3 ЗМР РТ»

2 Система графических координат компьютера

Система графических координат компьютера

Х

0

Y

При работе в графическом режиме весь экран разбивается на отдельные точки - "пикселы". Положение пиксела также задается двумя координатами - X и Y. Координата X увеличивается слева направо, а координата Y - сверху вниз.

Х

Y

3 Модули GraphABC и CRT

Модули GraphABC и CRT

Графические возможности языка Паскаль, сосредоточенны в стандартных библиотеках (модулях) GraphABC и CRT (Cathode-Ray Tube)). Эти библиотеки содержат константы, переменные, процедуры и функции, рассчитанные на работу с монитором в текстовом и графическом режимах.

4 Подключение библиотек CRT и GRAPH к программе осуществляется с помощью

Подключение библиотек CRT и GRAPH к программе осуществляется с помощью

ключевого слова Uses (англ. uses - использует) : Program risunok; Uses Crt, GraphABC;

5 Line (x1,y1,x2,y2); Рисует отрезок с началом в точке (x1,y1) и концом

Line (x1,y1,x2,y2); Рисует отрезок с началом в точке (x1,y1) и концом

в точке (x2,y2).

Графические примитивы

X

0

X1, Y1

Y

X2, Y2

6 Circle(x,y,r); Рисует окружность с центром в точке (x,y) и радиусом r

Circle(x,y,r); Рисует окружность с центром в точке (x,y) и радиусом r

x

X, Y

0

Y

7 Arc(x,y,r,a1,a2); Рисует дугу окружности с центром в точке (x,y) и

Arc(x,y,r,a1,a2); Рисует дугу окружности с центром в точке (x,y) и

радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки).

8 SetPenColor (color); Устанавливает цвет пера, задаваемый параметром

SetPenColor (color); Устанавливает цвет пера, задаваемый параметром

color. SetPenColor (clRed);

Цвет пера (линии контура)

9 При решении многих задач программирования графики возникает

При решении многих задач программирования графики возникает

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

10 Линии в ряд

Линии в ряд

100

Повторяющиеся действия (тело цикла): Вычерчивание линии. Вычисление новой координаты Х.

11 Программа «Линии в ряд»

Программа «Линии в ряд»

program pic; uses GraphABC, CRT; Var x,i: integer; begin Setpencolor (clred); x:= 50; For i:= 1 to 5 do begin line (x,40,x,340); x:= x+100; end; end.

12 Линии в ряд (вариант)

Линии в ряд (вариант)

Координаты линий и расстояние между ними выбрать самостоятельно

13 Волна

Волна

14 Мишень

Мишень

15 program mishen; uses GraphABC, crt; var i,r,c:integer; begin r:= 105;

program mishen; uses GraphABC, crt; var i,r,c:integer; begin r:= 105;

for i:= 1 to 10 do begin SetpenColor(clred); SetPenWidth(3); Circle(300,200,r); delay (500) ; r:= r-10; end ; end.

16 Сетка

Сетка

17 program setka; uses GraphABC, crt; var i,x,y,x1,y1:integer; begin

program setka; uses GraphABC, crt; var i,x,y,x1,y1:integer; begin

SetWindowSize(500,500); x:= 25; x1:=x + 400; y:= 25; y1:=y + 400; for i:= 1 to 41 do begin SetPenColor(clRed); line(x,y,x,y1); x:=x + 10; delay (100); end;

18 Продолжение «Сетка»

Продолжение «Сетка»

x:= 25; x1:=x + 400; y:= 25; y1:=y + 400; for i:= 1 to 41 do begin SetPenColor(clRed); line(x,y,x1,y); y:=y + 10; delay (100); end end.

19 Зонт

Зонт

20 program zont; uses GraphABC, crt; var i,x,y:integer; begin

program zont; uses GraphABC, crt; var i,x,y:integer; begin

SetWindowSize(800,600); x:= 100; y:=250; for i:= 1 to 4 do begin SetPenColor(clRed); SetPenWidth(3); Arc(x,y,50,0,180); x:=x+100; end; Arc(250,250,200,0,180); line (250,250,250,450); Arc(300,450,50,180,360); end.

«Цикл и графика»
http://900igr.net/prezentacija/ekonomika/tsikl-i-grafika-108720.html
cсылка на страницу
Урок

Экономика

125 тем
Слайды