Ellipse(X, Y, BB, OB, XR, YR)
|
Markazi(X,Y) x va y o’qlari bo’yicha radiuslari (XR, YR)teng elipsning BB burchagidan OB burchagigacha bo’lgan yoy chizadi.
|
Restangle(X1, Y1, X2, Y2)
|
Ekranni yuqori chap burchagi
(X1, Y1), quyi o’ng burchagi (X2, Y2) koordinatali nuqtada bo’lgan to’g’ri to’rtburchak chizadi.
|
Uses Graph;
Var Gd,Gm: Integer;
Begin Gd:= Detect; initGraph(gd, gm,’’);
SetColor(4);
Ellipse(300, 200, 0,135,100, 50);
SetColor(1); Restangle (10,220, 300,400) Readln; CloseGraph;
End.
Misol. Ichi ko’k rangliqalin gorizontal chiziqlar bilan to’ldirilgan to’g’ri to’rtburchak va havorang parallelopiped chizing.
Ekrandagi natija
Do'stlaringiz bilan baham: |