Mavzu: ehm da masalalar yechishning asosiy bosqichlari

Mavzu: Paskalning shakllar chizish operatorlari
Dars maqsadi:
a) Talimiyligi: O’quvchilarga shakllar chizish operatorini o’rgatish
b) Tarbiyaviyligi: O’quvchilarning kompyuter savodxonlik malakasini oshirish


O’quvchilarga qo’yiladigan talablar


1. O’quvchi bilishi kerak: Shakllar chizish operatorlarini
2. O’quvchi bajara olishi kerak : 1 – 7 mashqlar
3. Uyga vazifa : 8 – 9 mashqlar
Dars jihozi: kompyuterlar, disketalar ;


Darsning borishi:
Paskalning bir nechta shakl chizish operatorlari mavjud bo’lib, ular yordamida ekranda aylana, to’g’ri to’rtburchak kabi shakllar hosil qilish mumkin.
Circle(X,Y,R) operatori markazi (X,Y) nuqtada va radiusi R ga teng aylana chizadi.
Masalan, Circle(300,200,100) operatori markazi (300,200) koordinatali nuqtada va radiusi 100 (piksel)ga teng aylana chizadi.
Rectangle(X1,Y1,X2,Y2) operatori ekranda yuqori chap burchagi (X1,Y1) koordinatali va quyi o’ng burchagi (X2,Y2) koordinatali nuqtada bo’lgan to’g’ri to’rtburchak chizadi.
Masalan, Rectangle ( 10,10,200,100) operatori chap yuqori va o’ng pastki burchaklari mos ravishda (10,10) va (200,100) koordinatali nuqtalarda bo’lgan to’g’ri to’rtburchak chizadi.
Misol. Uses Graph;
Var gd, gm : Integer;
Begin
Gd:=Detect; InitGraph(gd,gm,");
Setcolor(Green); Cirde(300,200,100);
Setcolor(l); Rectangle(10,10,200,100);
End.
Paskalning ichi bo’yalgan shakllar chizish operatorlari ham bor. Ular yordamida ichi turli rang va usulda bo’yalgan shakllarni hosil qilish mumkin. Paskalda shakl ichini bo’yashning 12 xil usuli (biror rang bilan to’liq qoplash, turli yo’nalishdagi rangli chiziqlar bilan to’ldirish) bo’lib, ular 0 dan 11 gacha butun sonlar orqali ifodalanadi va SetFillStyle (usul,rang) operatori yordamida tanlanadi.
Masalan, SetFillStyle(2,4) operatoridan keyin chiziladigan shakl ichi qizil rangli gorizontal chiziqlar bilan to’ldiriladi.