«Паскаль АВС ба?дарламасында графиктік обьектілерді программалау»


СабаKтыS таKырыбы: ПаскальАВС баCдарламасында                                          графиктік   объектілерді программалау
СабаKтыS маKсаты:
Білімділік - ОKушыларды ПаскальАВС программалау тілінде Kолданылатын графиктік объектілер aCымымен таныстыру, ондаCы т_рлі операторларды оKушы санасында Kалыптастыру, олармен жaмыс жасауCа баулу.
ДамытушылыK – ОKушылардыS белсенділігі мен біліктілігін, ізденімпаздыK даCдыларын Kалыптастыру, графиктік операторларды пайдаланып компьютер экранында кескіндерді шыCаратын программаларды Kaрып жaмыс істеуін дамыту.
Т‰рбиелік – ОKушыларды аKпараттыK м‰дениеттілікке, ™зін - ™зі басKаруCа ж‰не баCалауCа т‰рбиелеу.
СабаKтыS т_рі: Білімді меSгерту
СабаKтыS ‰дісі: Баяндау, сaраK жауап , практикалыK жaмыс орындау
СабаKтыS к™рнекілігі: Таратпа кеспелер, компьютер, графопроектор
СабаKтыS барысы
`йымдастырылу кезеSі
оKушылармен с‰лемдесу

келмеген оKушыларды белгілеу

сабаKKа дайындыCын, Kaралдарын тексеру


^йге берілген тапсырманы сaрау
Jандай алгоритм циклдік алгоритм деп аталады?
Циклдік программа Kaру _шін Kандай операторларды KолдануCа болады?
ЦиклдіS Kандай т_рлері бар?
ДЕЙІН циклі деп Kандай циклді айтамыз?

ЖаSа сабаKты т_сіндіру
Pascal ABC программасындаCы графика
Pascal ABC баCдарламасында графиктік процедураларды енгізу _шін GraphABC модулі Kолданылады, арнайы процедуралар мен функцияларды пайдаланып н_кте, т_зу, шеSбер, тікбaрыш ж‰не басKа фигураларды салуCа болады.
uses GraphABC баCдарламаныS бірінші т_сінігі, графиктік режімді орнатады. SetPixel(x,y,color) - (x,y) координатасы бойынша color т_спен н_кте салады. Line(x1,y1,x2,y2) - (x1,y1) н_ктесінен (x2,y2) н_ктесіне дейін т_зу кесіндісін салады. SetPenColor(color) - color т_сі бойынша KаламныS т_сін орнатады.. SetPenWidth(n) - n н_ктеге теS KаламныS KалыSдыCын орнатады. Rectangle(x1,y1,x2,y2) - (x1,y1) ,(x2,y2) коорд. бойынша тікбaрыштар салады. FloodFill(x,y,color) -(x,y) н_ктесінен бастап color т_спен ауданды бояйды. SetBrushColor(color) – тaйыK ауданды бояйды. Ellipse(x1,y1,x2,y2) -(x1,y1) ж‰не (x2,y2) т™белері бойынша эллипс салады. Circle(x,y,r) - (x,y) центрі r радиусы болатын шеSбер сызады.                    Паскаль тілінде пайдаланылатын т_стер:

















0 50 100 150 Х

50

100

Y
Н_кте салу

0 50 100 150 Х

50

100

У


Т_зу кесінді салу

0 50 100 150 Х

50

100




Тікт™ртбaрыш салу

0 50 100 150 200 Х

50

100

150
Y





ШеSбер салу

0 50 100 150 Х

50

100



· Y



13 EMBED PowerPoint.Slide.12 1415

13 EMBED PowerPoint.Slide.12 1415
СабаKты Kорытындылау:
ГрафикалыK операторлар Kандай Kызмет атKарады?
Графиктік режімді Kалай орнатамыз ?
CIRCLE операторы Kандай Kызмет атKарады?
LINE операторы экранда Kандай кескіндер салады?
RECTANGLE операторы экранда Kандай кескін салады?
^йге тапсырма:  Паскаль АВС программасында                               графиктік   объектілерді программалау
ГрафикалыK режім теріс декарттыK ж_йесін пайдаланады.
Х осі солдан оSCа Kарай (640) ,
У осі жоCарыдан т™мен Kарай (480)
™згеріп отырады.
Есептеу (0,0) – ден басталады

Мысалы, экранда Kызыл ж‰не жасыл н_ктелер шыCарудыS программасы
Program nukteler;
Uses GraphABC;
Begin
SetPixel(25,50,clRed) ;
SetPixel(100,100,clGreen) ;
End.

Мысалы экранда сары т_спен кесінді салу керек
Program kesindi;
Uses GraphABC;
Begin
SetpenWidth(3);
SetpenColor(clYellow);
Line(50,100,125,25);
End.



Y

Мысалы экранда кок контурлы, іші Kою Kызыл т_ске боялCан тікт™ртбaрыш салу
Program tortburush;
Uses GraphABC;
Begin
SetpenWidth(3);
SetpenColor(clGreen);
SetbrushColor(clMaroon);
Rectangle(50,50,150,100);
End.







Мысалы экранда шеSберлер салу
Program tortburush;
Uses GraphABC;
Begin
SetpenWidth(3);
SetpenColor(clRed);
SetbrushColor(clYellow);
Circle(100,125,75);
SetbrushColor(clAqua);
Circle(100,125,50);
SetbrushColor(clBrown);
Circle(100,125,25);
End.



































































































































































































































































































































































































































clAqua – ашыK к™к clOlive – з‰йт_н т_стес clFuchsia – сирен т_стес clTeal – жасыл к™к clGray – к_Sгірт, Kою сaр clLime – ашыK жасыл clMoneyGreen – жасыл аKша т_сі clLtGray – ашыK сaр clDkGray – Kою сaр clMedGray – сaр clSilver – к_міс т_стес

clBlack – Kара clPurple – фиолетовый clWhite – аK clMaroon – Kою Kызыл clRed – Kызыл clNavy – Kою к™к clGreen – жасыл clBrown – KоSыр clBlue – к™к clSkyBlue – ашыK к™к clYellow – сары
clCream – ашыK KоSыр








































































































































































































































































































































































































































Root Entry