6 –misol. Ichi ko‘k rangli og‘ma katak chiziqlar bilan to‘ldirilgan ellips chizing.
Uses Graph;
Var gd, gm : Integer;
Begin Gd:=Detect;InitGraph(gd,gm, ‘‘); SetColor(Red);
SetFillStyle(8,1); FillEllips(320,240,200,100);
Readln; CloseGraph;
End.
Mavzuni mustahkamlash va yakunlash: O‘quvchilarga darslikdagi savollar orqali murojaat etiladi va 94-betdagi 1, 2, 3-mashqlar daftarda so`ng kompyuterda yechish asosida mavzu mustahkamlanadi.
O`quvchilarni baholash: Berilgan savollarga javob bergan o`quvchilarga hamda darslikdagi mashqlarni to`g`ri bajargan o`quvchilarga, kompyuterda dasturning natijasiga erishgan o`quvchilarga rag`bat kartochkalari tarqatilinib, dars so`ngida baholanadilar.
Uyga vazifa: Darslikdagi qolgan mashqlar
O’IBDO’ _________
Informatika
Mavzu: 43 – dars. Paskalning shakllar chizish imkoniyatlari mavzusini takrorlash
Do'stlaringiz bilan baham: |