uses GraphABC;
begin
SetWindowSize(256,256);
SetPenWidth(3);
Rectangle(15,120,241,165);
Line(128,85,128,165);
Line(78,120,78,165);
Line(178,120,178,165);
Line(93,85,163,85);
Line(78,120,93,85);
Line(163,85,178,120);
Line(88,135,98,135);
Line(158,135,168,135);
Circle(50,170,20);
Circle(190,170,20);
Circle(15,130,5);
Circle(241,130,5);
SetPenWidth(1);
Line(93,85,93,120);
Line(163,85,163,120)
end.
Объяснение:
картинка
