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


TÜRKMENISTANYŇ BILIM MINISTRLIGI TÜRKMENISTANYŇ MILLI BILIM

Programmalaşdyrma diliniň grafiki mümkinçiliklerini peýdalanyp ýönekeý programmalary düzmek

Слайды и текст этой презентации

Слайд 1TÜRKMENISTANYŇ BILIM MINISTRLIGI
TÜRKMENISTANYŇ MILLI BILIM

INSTITUTY
INFORMATIKA 7
Türkmenistanyň orta mekdepleriniň VII synplary üçin

interaktiw-multimedia elektron gollanmasy

AŞGABAT 2014

TÜRKMENISTANYŇ  BILIM  MINISTRLIGI TÜRKMENISTANYŇ  MILLI  BILIM INSTITUTYINFORMATIKA 7 Türkmenistanyň  orta mekdepleriniň

Слайд 2Programmalaşdyrma diliniň grafiki mümkinçiliklerini peýdalanyp ýönekeý programmalary düzmek

Programmalaşdyrma diliniň grafiki mümkinçiliklerini peýdalanyp ýönekeý programmalary düzmek

Слайд 3
Üçburçlugy çyzmagyň we boýamagyň programmasy

Program boýalan_üçburçluk; {Programmanyň sözbaşysy}
Uses GraphAbc; {GraphAbc

moduly birikdirmek}
Begin {Programmanyň başlangyjy}
SetWindowSize (640,480); {Grafiki

penjiräniň ölçeglerini goýmak}
ClearWindow (clWhite); {Grafiki penjiräni ak reňk bilen arassalamak}


Ýapyk figuralary FloodFill(x,y,color) buýrugynyň kömegi bilen boýap bolýar, bu ýerde (x,y) boýalýan figuranyň içki çäginde ýerleşen nokadyň koordinatasy, color bolsa boýagyň reňkidir.

Üçburçlugy çyzmagyň we boýamagyň programmasyProgram boýalan_üçburçluk; {Programmanyň sözbaşysy}Uses GraphAbc; {GraphAbc moduly birikdirmek}Begin  {Programmanyň başlangyjy}  SetWindowSize

Слайд 4SetPenWidth (3); {Galamyň ýogynlygyny kesgitlemek}
SetPenStyle (psSolid); {Çyzyga tutuş

çyzyk stilini goýmak}
SetPenColor (clGreen); {Galamyň ýaşyl reňkini goýmak}
Line (100,200,170,70);

{Ýaşyl reňkli çyzyk çyzmak}
Line (170,70,250,200);
Line (250,200,100,200);
FloodFill (150,120,clRed); {Üçburçlugy gyzyl reňk bilen boýamak}
End. {Programmanyň soňy}
SetPenWidth (3);  {Galamyň ýogynlygyny kesgitlemek}SetPenStyle (psSolid);  {Çyzyga tutuş çyzyk stilini goýmak}SetPenColor (clGreen);  {Galamyň ýaşyl

Слайд 5Gönüburçluk we töwerek çyzmagyň programmasy

Program gönüburçluk we töwerek;

{Programmanyň sözbaşysy}
Uses GraphAbc; {GraphAbc moduly birikdirmek}
Begin {Programmanyň başlangyjy}


SetWindowSize (640,480); {Grafiki penjiräniň ölçeglerini goýmak}
SetPenColor (clBlue); {Gönüburçlugyň çägini çyzmak üçin, galama gök reňk goýmak}
Gönüburçluk we töwerek çyzmagyň programmasy Program gönüburçluk we töwerek;  {Programmanyň sözbaşysy}Uses GraphAbc;  {GraphAbc moduly birikdirmek}Begin

Слайд 6SetPenWidth (6); {Galamyň ýogynlygyny kesgitlemek}
Rectangle (50,50,250,150); {Garşylykly depeleriniň

koordinatalary (50,50) we (250,150) bolan gönüburçlugy çyzmak}
SetPenColor (clRed); {Töweregiň

çägini çyzmak üçin, galama gyzyl reňk goýmak}
Circle (350,100,60); {Merkezi (350,100) koordinataly nokatda we radius 60 bolan töweregi çyzmak}
End. {Programmanyň soňy}
SetPenWidth (6);  {Galamyň ýogynlygyny kesgitlemek}Rectangle (50,50,250,150);  {Garşylykly depeleriniň koordinatalary (50,50) we (250,150) bolan gönüburçlugy çyzmak}SetPenColor

Слайд 8Gönüburçluk we tegelek çyzyp, olary boýaýan we ýazgy goýýan programma



Program Boýamak we ýazgy goýmak; {Programmanyň sözbaşysy}
Uses GraphAbc; {GraphAbc moduly

birikdirmek}
Begin {Programmanyň başlangyjy}
SetWindowSize(640,480);{Grafiki penjiräniň ölçeglerini bermek}
ClearWindow (clYellow); {Düşege sary reňki bermek}
SetPenColor (clTeal); {Galama gök-ýaşyl reňki bermek}
SetPenWidth (5); {Çyzygyň ýogynlygyny bermek}
SetBrushColor (clOlive); {Çotga zeýtun reňki bermek}
Rectangle (100,100,300,200); {Zeýtun reňke boýalan gönüburçluk çyzmak}
SetBrushColor (clBlue); {Çotga gök reňki bermek}
Circle (400,150,50); {Gök reňke boýalan töwerek çyzmak}
Gönüburçluk we tegelek çyzyp, olary boýaýan we ýazgy goýýan programma Program Boýamak we ýazgy goýmak; {Programmanyň sözbaşysy}Uses

Слайд 9SetFontStyle (fsbold); {Şrifte stil bermek}
SetFontSize (15); {Piksellerde şriftiň

öleçegini bermek}
SetBrushColor (clYellow); {Çotga sary reňk bermek}
SetFontColor (clOlive);

{Şrifte zeýtun reňk bermek}
TextOut (100,220, 'Gönüburçluk'); {Çep ýokarky burçy (100,200) koordinataly nokatda bolan gönüburçlukda ýazgyny ýerleşdirmek}
SetFontColor (clBlue); {Şrifte gök reňk bermek}
TextOut (380,220, 'Tegelek'); {Çep ýokarky burçy (380,220) koordinataly nokatda bolan gönüburçlukda ýazgyny ýerleşdirmek}
End. {Programmanyň soňy}
SetFontStyle (fsbold);  {Şrifte stil bermek}SetFontSize (15);  {Piksellerde şriftiň öleçegini bermek}SetBrushColor (clYellow);  {Çotga sary reňk

Слайд 11Interaktiw-multimedia elektron
gollanmanyň awtorlary:



Saryýew Döwran
Ataýew Kakageldi
Garýagdyýew Oraz

Interaktiw-multimedia elektron gollanmanyň awtorlary: Saryýew DöwranAtaýew KakageldiGarýagdyýew Oraz

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

Если не удалось найти и скачать доклад-презентацию, Вы можете заказать его на нашем сайте. Мы постараемся найти нужный Вам материал и отправим по электронной почте. Не стесняйтесь обращаться к нам, если у вас возникли вопросы или пожелания:

Email: Нажмите что бы посмотреть 

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

Это сайт презентации, докладов, проектов в PowerPoint. Здесь удобно  хранить и делиться своими презентациями с другими пользователями.


Для правообладателей

Яндекс.Метрика