составьте программу которая рисует красные круги радиуса 30 по вертикали вдоль левого края графического окна

ДА. СПАСИБО

program krug; uses graphabc; var x,y,r,i:integer; begin setwindowsize (640,480); setwindowtitle ('Êðóã'); setpencolor (clred); setpenwidth (4); x:=50;  y:=50; r:=40; for i:=1 to 10 do begin circle(x,y,r); x:=x+80; end; end.Такое пойдёт?