Cоставить программу вывода на экран 5 олимпийских колец разного цвета

uses graphabc; var x,y,r:integer; begin setwindowsize(450,300); setwindowtitle('Олимпийские кольца'); setpenwidth(1); setpencolor(clblue);x:=100;y:=100;r:=50;circle(x,y,r); setpencolor(clblack);x:=220;y:=100;r:=50;circle(x,y,r); setpencolor(clred);x:=340;y:=100;r:=50;circle(x,y,r); setpencolor(clyellow);x:=150;y:=150;r:=50;circle(x,y,r); setpencolor(clgreen);x:=270;y:=150;r:=50;circle(x,y,r); end.