Помогите найти ошибку в программе паскальАВС
В школе у меня вышла такая программа, но она не работает почему то ( скажите, где ошибка?
program circle1_1;
uses crt, graphabc;
begin
randomize;
repeat
//putpixel(random(640),random(480,clrandom);
delay(10);
until keypressed;
var x:INTEGER;
begin
for x:=20 to 620 do
begin
setpencolor(clgreen);
circle(x,480-x,50-2);
DELAY(10);
SETPENCOLOR(CLWHITE);
circle(x,480-x,50);
end;
end.