kopilkaurokov.ru - сайт для учителей

Создайте Ваш сайт учителя Курсы ПК и ППК Видеоуроки Олимпиады Вебинары для учителей

Графикалы? процедура

Нажмите, чтобы узнать подробности

Эту презентацию можно использовать на уроке информатики для 9-го класса. Для обьяснения новой темы. В начале презентаций имеются задания "Найди лишнее", "Информатическое соответствие". Эти задания можно использовать для опроса домашнего задания. В обьяснений новой темы имеются определения графической процедуры, также есть способы создания разных графических примитивов. 

Просмотр содержимого документа
«Графикалы? процедура»

Рептьюкром Тамикатема Акауиф лиягоибо Компьютер Математика Физика Биология

Рептьюкром

Тамикатема

Акауиф

лиягоибо

Компьютер

Математика

Физика

Биология

Программа Мышка Редактор меню  Марамгроп кышма Дакротре Енюм

Программа

Мышка

Редактор

меню

Марамгроп

кышма

Дакротре

Енюм

Екі, бес, нөл, қосынды, бір, тоғыз

Екі, бес, нөл, қосынды, бір, тоғыз

Көбейту, өшіру, азайту, қосу, бөлу

Көбейту, өшіру, азайту, қосу, бөлу

вирус, синус, косинус, тангенс

вирус, синус, косинус, тангенс

Visual Basic, Microsoft Office, Turbo Pascal, Java .

Visual Basic,

Microsoft Office,

Turbo Pascal,

Java .

Холлерит, Паскаль, Менделеев,  Нортон .

Холлерит,

Паскаль,

Менделеев,

Нортон .

Информатикалық ұйқас Компьютердің есептерін басқарған, Артығы жоқ визуальді Паскалдан. ............

Информатикалық ұйқас

Компьютердің есептерін басқарған,

Артығы жоқ визуальді

Паскалдан.

............

Информатикалық ұйқас Қызыл, жасыл, сары, ақ пен қоңырды, Салу үшін білу керек с olor- д і. ............

Информатикалық ұйқас

Қызыл, жасыл, сары, ақ пен қоңырды,

Салу үшін білу керек

с olor- д і.

............

Информатикалық ұйқас Графиканы сызып берер тура, Ол программа процедура. ............

Информатикалық ұйқас

Графиканы сызып берер тура,

Ол программа

процедура.

............

Информатикалық ұйқас Операторды бастар кезде не дейм, Ең басында жазылады ............ begin . Ал соңында не деп жазам енді, Ол әрине end . ............

Информатикалық ұйқас

Операторды бастар кезде не дейм,

Ең басында жазылады

............

begin .

Ал соңында не деп жазам енді,

Ол әрине

end .

............

Графикалық процедуралар 06.02.2014.

Графикалық процедуралар

06.02.2014.

Дисплей экраны нүктелер жиыны болып табылатын төрт бұрыш болып табылады. Ол графикалық және мәтіндік режімдерде жұмыс атқара алады. Графикалық режимде экранның әрбір нүктесін түрлі түске бояп, сол түстер арқылы сызық, әр түрлі бейнелер кескіндеуге болады. Дисплей теледидар сияқты жұмыс істейді, экрандағы бейне секундына 25 рет қайталанып отырады. Адамның көзі бейнелерді мұндай жиілікпен ауысуын байқай алмайды да, мониторда сол бейне қозғалмай тұрғандай болып көрінеді. Экрандағы бейнелер кішкене нүктелерден (пиксельдерден) тұратын қатарларға біріктірілген. Сондықтан экранның басқарылатын ең кіші элементі пиксель (pixel) болып табылады. Экрандағы кез келген бейне осы пиксельдер арқылы салынады. Графикалық режимде экран тіктөртбұрышты пиксельдер жиынынан құралады да, мұнда кез келген пикселінің түсін әртүрлі етуге мүмкіндік бар.

Дисплей экраны нүктелер жиыны болып табылатын төрт бұрыш болып табылады. Ол графикалық және мәтіндік режімдерде жұмыс атқара алады.

Графикалық режимде экранның әрбір нүктесін түрлі түске бояп, сол түстер арқылы сызық, әр түрлі бейнелер кескіндеуге болады.

Дисплей теледидар сияқты жұмыс істейді, экрандағы бейне секундына 25 рет қайталанып отырады. Адамның көзі бейнелерді мұндай жиілікпен ауысуын байқай алмайды да, мониторда сол бейне қозғалмай тұрғандай болып көрінеді. Экрандағы бейнелер кішкене нүктелерден (пиксельдерден) тұратын қатарларға біріктірілген. Сондықтан экранның басқарылатын ең кіші элементі пиксель (pixel) болып табылады. Экрандағы кез келген бейне осы пиксельдер арқылы салынады. Графикалық режимде экран тіктөртбұрышты пиксельдер жиынынан құралады да, мұнда кез келген пикселінің түсін әртүрлі етуге мүмкіндік бар.

Экрандық координаттық жүйе Дисплей теледидар сияқты жұмыс істейді, экрандағы бейне секундына 25 рет қайталанып отырады. Адамның көзі бейнелерді мұндай жиілікпен ауысуын байқай алмайды да, мониторда сол бейне қозғалмай тұрғандай болып көрінеді. Экрандағы бейнелер кішкене нүктелерден (пиксельдерден) тұратын қатарларға біріктірілген. Сондықтан экранның басқарылатын ең кіші элементі пиксель (pixel) болып табылады. Экрандағы кез келген бейне осы пиксельдер арқылы салынады. Графикалық режимде экран тіктөртбұрышты пиксельдер жиынынан құралады да, мұнда кез келген пикселінің түсін әртүрлі етуге мүмкіндік бар. (6 40 ,0) (0,0) x Пиксель Экран (0,4 80 ) y

Экрандық координаттық жүйе

Дисплей теледидар сияқты жұмыс істейді, экрандағы бейне секундына 25 рет қайталанып отырады. Адамның көзі бейнелерді мұндай жиілікпен ауысуын байқай алмайды да, мониторда сол бейне қозғалмай тұрғандай болып көрінеді. Экрандағы бейнелер кішкене нүктелерден (пиксельдерден) тұратын қатарларға біріктірілген. Сондықтан экранның басқарылатын ең кіші элементі пиксель (pixel) болып табылады. Экрандағы кез келген бейне осы пиксельдер арқылы салынады. Графикалық режимде экран тіктөртбұрышты пиксельдер жиынынан құралады да, мұнда кез келген пикселінің түсін әртүрлі етуге мүмкіндік бар.

(6 40 ,0)

(0,0)

x

Пиксель

Экран

(0,4 80 )

y

Program pr; Uses crt,  Graph;  { графикалық модуль ді іске қосу } Var GraphDriver, { графикалық драйвер } Graphmode:integer; { графикалық режим типі } Begin Clrscr;  { экранды тазалау } GraphDriver:=0; { Графикалық драйверді ашу } Initgraph(GraphDriver,  GraphMode,’ путь к файлу egavga.bgi’); { Графикалық жүйені инициализация жасайды және аппаратураны графикалық режимге ауыстырады } Readkey; Closegraph;  ; { графиктік режимді жабу } End. 16

Program pr;

Uses crt, Graph; { графикалық модуль ді іске қосу }

Var GraphDriver, { графикалық драйвер }

Graphmode:integer; { графикалық режим типі }

Begin

Clrscr; { экранды тазалау }

GraphDriver:=0; { Графикалық драйверді ашу }

Initgraph(GraphDriver, GraphMode,’ путь к файлу egavga.bgi’);

{ Графикалық жүйені инициализация жасайды және аппаратураны графикалық режимге ауыстырады }

Readkey;

Closegraph; ; { графиктік режимді жабу }

End.

16

Графиктік режимді іске қосу InitGraph (gd,gm,p)  Графикалық драйвер ( gd=9 ) Драйверге бару жолы Режим (разрешение) ‘ c:\trans\bp\bgi’ gm= 0 - низкое ( 640x200) gm=1 - среднее ( 640x350) gm=2 - высокое ( 640x480) y

Графиктік режимді іске қосу

InitGraph (gd,gm,p)

Графикалық драйвер ( gd=9 )

Драйверге бару жолы

Режим (разрешение)

‘ c:\trans\bp\bgi’

gm= 0 - низкое ( 640x200)

gm=1 - среднее ( 640x350)

gm=2 - высокое ( 640x480)

y

Сызықтің түсі SetLineStyle(s, p, t) Стиль Шаблон Қалыңдығы 0 1 2 3 4  Определяется шаблоном 1  Жіңішке 3  Қалың

Сызықтің түсі

SetLineStyle(s, p, t)

Стиль

Шаблон

Қалыңдығы

0

1

2

3

4 Определяется шаблоном

1 Жіңішке

3 Қалың

0 – қара-чёрный 1 – көк-синий 2 – жасыл-зеленый 3 – к өгілдір-г олубой 4 – қызыл-красный 5 – күлгін-фиолетовый 6 – қоңыр-коричневый 7 – ашық сұр-светло-серый 8 – қою сұр-темно-серый 9 – ашық көк-ярко-синий 10 – ашық жасыл-ярко-зелёный 11 – ашық көгілдір-ярко-голубой 12 – ашық қызыл-ярко-красный 13 – ашық күлгін-ярко-розовый 14 – сары-жёлтый 15 – ақ-белый SetColor(c) 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 20

0 – қара-чёрный

1 – көк-синий

2 – жасыл-зеленый

3 – к өгілдір-г олубой

4 – қызыл-красный

5 – күлгін-фиолетовый

6 – қоңыр-коричневый

7 – ашық сұр-светло-серый

8 – қою сұр-темно-серый

9 – ашық көк-ярко-синий

10 – ашық жасыл-ярко-зелёный

11 – ашық көгілдір-ярко-голубой

12 – ашық қызыл-ярко-красный

13 – ашық күлгін-ярко-розовый

14 – сары-жёлтый

15 – ақ-белый

SetColor(c)

0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

20

Стиль № Толтыру стилінің түсі 0 Стиль № Толтыру (фон түсімен бояйды) 1 Толтыру стилінің түсі 2 Ағымдағы түспен бояйды 6 3 7 4 8 9 5 10 11 21

Стиль №

Толтыру стилінің түсі

0

Стиль №

Толтыру (фон түсімен бояйды)

1

Толтыру стилінің түсі

2

Ағымдағы түспен бояйды

6

3

7

4

8

9

5

10

11

21

Нүкте салу PutPixel (x, y, c);  Координаттар Түс x y

Нүкте салу

PutPixel (x, y, c);

Координаттар

Түс

x

y

Экранның ортасында жасыл түсті нүкте салу Program Primer; Uses Graph; Var Gd, Gm : Integer; Begin  Gd:=9; Gm:=2;  InitGraph(Gd,Gm,’c:\bp\bgi’);  PutPixel(320,240,2);  Readln;  CloseGraph; End.

Экранның ортасында жасыл түсті нүкте салу

Program Primer;

Uses Graph;

Var Gd, Gm : Integer;

Begin

Gd:=9; Gm:=2;

InitGraph(Gd,Gm,’c:\bp\bgi’);

PutPixel(320,240,2);

Readln;

CloseGraph;

End.

Сызық Оператор  LINE(X1,Y1,X2,Y2);  рисует на экране отрезок прямой из точки с координатами  (x1,y1) до точки с координатами (x2,y2) . 24

Сызық

Оператор LINE(X1,Y1,X2,Y2); рисует на экране отрезок прямой из точки с координатами (x1,y1) до точки с координатами (x2,y2) .

24

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer1; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Putpixel(123,423,yellow); Readln; End. .

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer1;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Putpixel(123,423,yellow);

Readln;

End.

.

Түсті орнату SetColor(Color:integer); Суреттің негізгі түсін орнатады SetBkColor(Color:integer); Ағымдағы фонның түсін орнатады Мысалы: экранға координаттары (100,50) болатын көк түсті төртбұрыштың бөлігіне координаттары (400, 300) болатын қызыл түсті кемкінді салайық:                 SetBkColor( 1 );  SetColor( 4 );  LINE( 100 , 50 , 400,300 );     24

Түсті орнату

SetColor(Color:integer);

Суреттің негізгі түсін орнатады

SetBkColor(Color:integer);

Ағымдағы фонның түсін орнатады

Мысалы: экранға координаттары (100,50) болатын көк түсті төртбұрыштың бөлігіне координаттары (400, 300) болатын қызыл түсті кемкінді салайық:

SetBkColor( 1 );

SetColor( 4 );

LINE( 100 , 50 , 400,300 );

24

Тіктөртбұрыш   (х1,у1)          (х2,у2)  Bar(x1,y1,x2,y2)  іші боялған тіктөртбұрыш. Іші боялған фигураны салу үшін:   -Фигураның түсін таңдау керек :  SETCOLOR ( түс №) ;  -Толтырудың түсі мен стилін таңдау керек :  SETFILLSTYLE ( стиль №, түс № ) ;  -Фигураны салу :  { фигураның аты }  ( толтыруға керекті мәліметтер) ;  -Фигураның ішін бояу :  FLOODFILL (x,y, жиектерінің түсі №) ; 27

Тіктөртбұрыш

(х1,у1)

(х2,у2)

Bar(x1,y1,x2,y2) іші боялған тіктөртбұрыш.

Іші боялған фигураны салу үшін:

-Фигураның түсін таңдау керек :

SETCOLOR ( түс №) ;

-Толтырудың түсі мен стилін таңдау керек :

SETFILLSTYLE ( стиль №, түс № ) ;

-Фигураны салу : { фигураның аты } ( толтыруға керекті мәліметтер) ;

-Фигураның ішін бояу : FLOODFILL (x,y, жиектерінің түсі №) ;

27

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer5; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Rectangle(123,23,254,240); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer5;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Rectangle(123,23,254,240);

Readln;

End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer13; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); SetBKColor(blue); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer13;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

SetBKColor(blue);

Readln;

End.

CIRCLE(x,y,r)  экранға шеңбер сызу процедурасы. Мұндағы (х,у) центрдің координаттары, ал  r - радиусы . 30

CIRCLE(x,y,r) экранға шеңбер сызу процедурасы. Мұндағы (х,у) центрдің координаттары, ал r - радиусы .

30

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer7; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Circle(320,240,50); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer7;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Circle(320,240,50);

Readln;

End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer15; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Setcolor(green); Circle(320,240,20); Setfillstyle(2,green); Floodfill(320,240); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer15;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Setcolor(green);

Circle(320,240,20);

Setfillstyle(2,green);

Floodfill(320,240);

Readln;

End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer16; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Setcolor(red); Circle(320,240,30); FloodFill(red); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer16;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Setcolor(red);

Circle(320,240,30);

FloodFill(red);

Readln;

End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer2; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Line(123,500,320,240); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer2;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Line(123,500,320,240);

Readln;

End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer3; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Line(320,240,400,240); Lineto(123,120); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer3;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Line(320,240,400,240);

Lineto(123,120);

Readln;

End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp NONAME00.PAS Run Ctrl+F9 Strepover F8 Trace into F7 Go to cursur F4 Program reset Ctrl+F2 Parameters Program primer14; Uses crt,graph; Var vga,vgahi:integer; Begin Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’); Setcolor(red); Line(100,100,200,200); Readln; End.

F ile E dit S earch R un C ompile D ebug T ools O ptions W indows H elp

NONAME00.PAS

Run Ctrl+F9

Strepover F8

Trace into F7

Go to cursur F4

Program reset Ctrl+F2

Parameters

Program primer14;

Uses crt,graph;

Var vga,vgahi:integer;

Begin

Initgraph(vga,vgahi,’C:\Prog\tp7\Bgi’);

Setcolor(red);

Line(100,100,200,200);

Readln;

End.

Есте сақтау диктанты := ' ' Pixel Graph Uses Close Line

Есте сақтау диктанты

:=

' '

Pixel

Graph

Uses

Close

Line

"Машина адам тапсырмаған жұмысты және өзі орындай алмайтын

жұмысты ешқашанда орындай алмайды"

Ада Лавлейс.

К омпьютермен жұмыс

400 Соңы" width="640"

Ғажайып тіктөртбұрыштар

Басы

20-дан 40 ppi -ға дейін 20 ppi қадаммен өсіп отыратын тіктөртбұрыштар салу керек. Экранның орта нүктесі тіктөртбұрыштың ортасымен сәйкес келеді. Квадраттың түсі кездейсоқ сандармен анықталады.

Х1=310; у1=230;

а=20

c = random(15)

Квадрат саламыз

А 400

Соңы

Воздушные пузыри Начало Нарисовать окружности, кол-во которых задается пользователем. Центр, радиус и цвет окружностей задаётся случайным числом. Ввод кол-ва Окружностей ( n) i:=1 to n конец C:=random(15) r:=random(80) x:=random(600) y:=random(400) Рисуем окружность

Воздушные пузыри

Начало

  • Нарисовать окружности, кол-во которых задается пользователем. Центр, радиус и цвет окружностей задаётся случайным числом.

Ввод кол-ва

Окружностей ( n)

i:=1 to n

конец

C:=random(15)

r:=random(80)

x:=random(600)

y:=random(400)

Рисуем

окружность

Жұлдыз Басы Түзу сызық арқылы жұлдызша салу Кескінді саламыз setcolor(15); line(200,40,300,180); Кесінді саламыз setcolor(15); line(180,80,200,140); Кесінді саламыз setcolor(15); line(300,80,320,140); … Соңы

Жұлдыз

Басы

Түзу сызық арқылы жұлдызша салу

Кескінді саламыз

setcolor(15);

line(200,40,300,180);

Кесінді саламыз

setcolor(15);

line(180,80,200,140);

Кесінді саламыз

setcolor(15);

line(300,80,320,140);

Соңы

Гүл басы 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); Соңы

Гүл

басы

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);

Соңы

Робот начало Нарисовать робота из разноцветных прямоугольников. Рисуем туловище: setfillStyle(1,11); Bar(200,40,300,180); Рисуем голову setfillStyle(1, 15 ); Bar(180,80,200,140); Рисуем глаз setfillStyle(1, 14 ); Bar(300,80,320,140); … конец

Робот

начало

  • Нарисовать робота из разноцветных прямоугольников.

Рисуем туловище:

setfillStyle(1,11);

Bar(200,40,300,180);

Рисуем голову

setfillStyle(1, 15 );

Bar(180,80,200,140);

Рисуем глаз

setfillStyle(1, 14 );

Bar(300,80,320,140);

конец

Бауырсақ Басы Әр түрлі-түсті эллипспен бауырсақтың суретін салу Дөңгелек бауырсақ саламыз. Сол көзін саламыз Оң көзін саламыз Мұрнын саламыз Аузын саламыз Соңы

Бауырсақ

Басы

Әр түрлі-түсті эллипспен бауырсақтың суретін салу

Дөңгелек бауырсақ саламыз.

Сол көзін саламыз

Оң көзін саламыз

Мұрнын саламыз

Аузын саламыз

Соңы

Снеговик начало setcolor(1 1 ); Setfilstyle(1,11); floodFillStyle(260,120,11); Нарисовать снеговик одними разноцветными окружностями. setcolor(1 1 ); Setfilstyle(1,11); floodFillStyle(260,220,11); setcolor(1 1 ); Setfilstyle(1,11); floodFillStyle(260,360,11); … конец

Снеговик

начало

setcolor(1 1 ); Setfilstyle(1,11);

floodFillStyle(260,120,11);

  • Нарисовать снеговик одними разноцветными окружностями.

setcolor(1 1 ); Setfilstyle(1,11);

floodFillStyle(260,220,11);

setcolor(1 1 ); Setfilstyle(1,11);

floodFillStyle(260,360,11);

конец

"Мақал – сөз мәйегі"

"Бұл кім? Бұл не?"

Ада Лавлейс

Николаус Вирт

Билл Гейтс


Получите в подарок сайт учителя

Предмет: Информатика

Категория: Презентации

Целевая аудитория: 9 класс.
Урок соответствует ФГОС

Скачать
Графикалы? процедура

Автор: Бекенова Зульфия Тулебаевна

Дата: 27.02.2016

Номер свидетельства: 299483

Похожие файлы

object(ArrayObject)#852 (1) {
  ["storage":"ArrayObject":private] => array(6) {
    ["title"] => string(134) "Ақпараттық технология. Негізгі графикалық процедуралар жəне функциялар."
    ["seo_title"] => string(80) "ak_parattyk_tiekhnologhiia_nieghizghi_ghrafikalyk_protsieduralar_zh_nie_funktsii"
    ["file_id"] => string(6) "384400"
    ["category_seo"] => string(11) "informatika"
    ["subcategory_seo"] => string(5) "uroki"
    ["date"] => string(10) "1485501504"
  }
}
object(ArrayObject)#874 (1) {
  ["storage":"ArrayObject":private] => array(6) {
    ["title"] => string(66) "Графикалы? ?дістер мен процедуралар "
    ["seo_title"] => string(38) "grafikalyk-distier-mien-protsieduralar"
    ["file_id"] => string(6) "170203"
    ["category_seo"] => string(11) "informatika"
    ["subcategory_seo"] => string(11) "presentacii"
    ["date"] => string(10) "1423506012"
  }
}
object(ArrayObject)#852 (1) {
  ["storage":"ArrayObject":private] => array(6) {
    ["title"] => string(68) ""Графикалы? ?дістер мен процедуралар" "
    ["seo_title"] => string(40) "grafikalyk-distier-mien-protsieduralar-1"
    ["file_id"] => string(6) "173016"
    ["category_seo"] => string(11) "informatika"
    ["subcategory_seo"] => string(5) "uroki"
    ["date"] => string(10) "1423916881"
  }
}
object(ArrayObject)#874 (1) {
  ["storage":"ArrayObject":private] => array(6) {
    ["title"] => string(65) "Графикалы? режимге м?тін жазу т?сілі"
    ["seo_title"] => string(41) "grafikalyk-riezhimghie-m-tin-zhazu-t-sili"
    ["file_id"] => string(6) "277051"
    ["category_seo"] => string(11) "informatika"
    ["subcategory_seo"] => string(5) "uroki"
    ["date"] => string(10) "1452838059"
  }
}
object(ArrayObject)#852 (1) {
  ["storage":"ArrayObject":private] => array(6) {
    ["title"] => string(59) "Графикалы? ?дістер мен процедура"
    ["seo_title"] => string(32) "grafikalykdistiermienprotsiedura"
    ["file_id"] => string(6) "270830"
    ["category_seo"] => string(11) "informatika"
    ["subcategory_seo"] => string(11) "presentacii"
    ["date"] => string(10) "1451288593"
  }
}

Получите в подарок сайт учителя

Видеоуроки для учителей

Курсы для учителей

ПОЛУЧИТЕ СВИДЕТЕЛЬСТВО МГНОВЕННО

Добавить свою работу

* Свидетельство о публикации выдается БЕСПЛАТНО, СРАЗУ же после добавления Вами Вашей работы на сайт

Удобный поиск материалов для учителей

Ваш личный кабинет
Проверка свидетельства