كود يرسم دائرة في الباسكال من برمجتي

simo الأبراج الصينية : نقاط : 27115

[size=16]

اقدم لكم اليوم كود بسيط من برمجتي يرسم داءرة في البسكال
الكود
; program garfhismes
; uses graph
; var x:integer
; y:integer
begin
; x:=detect
;(' initgraph(x,y,'c:\outils\tp\big
;( setcolor(cyan
;( circle(300,250,200
; readln
; closegraph
. end
سأشرح اهم شيء في الكود
;( circle(300,250,200
القيمة 300 تمثل بعد الدائرة علىيسار الشاشة
القيمة 250 تمثل علو الدائرة عن الشاشة
القيمة200 تمثل قطر الدائرة
عند تجريب الكود قمو بتغير هده القيم وستفهمون اكثر
في الأخير تقبلو تحياتي واي سؤال انا في الخدمة

[/size]

» (¯`•¸·´¯) (حصــــ / برنامج القرآن الكريـــم \ ـــــريا من برمجتي المتواضعة)(¯`·¸•´¯)