alex01.pas

This ar the basic programs that i did in highschool. From very simple to medium programs. From array

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