О боги,опять этот Паскаль...АЗАЗАЗ...а в ФШ можно:?Почему именно в нём?

Ответы и объяснения

  • Участник Знаний
2014-04-11T12:27:47+00:00
Uses GraphABC;
var  x,y: integer;
begin
pen.Color:=clRed;
Brush.Color :=clRed;
circle(170,200,30);
circle(230,200,30);
circle(150,150,50);
circle(250,150,50);
Brush.Color :=clGold;
Ellipse(190,110,210,230);
Brush.Color :=clDarkGreen;
Line(200,110,180,80);
Line(200,110,220,80);
circle(200,110,10); 
end.