alex01.pas

来自「This ar the basic programs that i did in」· PAS 代码 · 共 11 行

program laf;
uses graph;
var
gd,gm:integer;
begin
gd:=detect;
initgraph(gd,gm,'c:/bp/bgi');
circle(200,150,50);
readln;
closegraph;
end.