uses graphABC;
Begin
Setbrushstyle(bsClear);
SetPenWidth(13);
SetPenColor(clBlue);
Circle (140,200,100);
SetPenColor(clBlack);
Circle (320,200,100);
SetPenColor(clRed);
Circle (500,200,100);
SetPenColor(clYellow);
Circle (240,315,100);
SetPenColor(clGreen);
Circle (420,315,100);
Arc(140,200,100,-17,90);
Arc(320,200,100,180,200);
Arc(320,200,100,-15,90);
Arc(500,200,100,180,270);
Arc (240,315,100,0,45)
end.
Объяснение:
картинка
uses graphABC;
Begin
Setbrushstyle(bsClear);
SetPenWidth(13);
SetPenColor(clBlue);
Circle (140,200,100);
SetPenColor(clBlack);
Circle (320,200,100);
SetPenColor(clRed);
Circle (500,200,100);
SetPenColor(clYellow);
Circle (240,315,100);
SetPenColor(clGreen);
Circle (420,315,100);
SetPenColor(clBlue);
Arc(140,200,100,-17,90);
SetPenColor(clBlack);
Arc(320,200,100,180,200);
SetPenColor(clBlack);
Arc(320,200,100,-15,90);
SetPenColor(clRed);
Arc(500,200,100,180,270);
SetPenColor(clYellow);
Arc (240,315,100,0,45)
end.
Объяснение:
картинка