1 фигура
uses Drawman;
begin
field(10,10);
ToPoint(5,5);
PenDown;
ToPoint(5,10);
ToPoint(5,5);
ToPoint(0,5);
ToPoint(3,5);
onvector(2,4);
PenUp;
ToPoint(2,5);
PenDown;
onvector(3,3);
ToPoint(5,5);
ToPoint(10,5);
ToPoint(5,5);
ToPoint(5,0);
ToPoint(5,2);
onvector(-3,3);
ToPoint(5,2);
ToPoint(5,3);
ToPoint(5,1);
ToPoint(3,5);
ToPoint(7,5);
ToPoint(5,9);
ToPoint(5,8);
ToPoint(8,5);
ToPoint(5,2);
ToPoint(5,1);
ToPoint(7,5);
end.
2 фигура
uses drawman;
begin
field(10,10);
ToPoint(5,5);
PenDown;
ToPoint(5,10);
ToPoint(5,5);
ToPoint(0,5);
ToPoint(5,5);
ToPoint(10,5);
ToPoint(5,5);
ToPoint(5,0);
ToPoint(5,5);
ToPoint(8,5);
ToPoint(8,8);
ToPoint(5,5);
ToPoint(8,8);
ToPoint(5,8);
ToPoint(5,7);
ToPoint(4,7);
ToPoint(4,3);
ToPoint(7,3);
ToPoint(7,7);
ToPoint(5,7);
end.