program grib;
uses drawman;
begin
Field(10,10);
ToPoint(3,4);
PenDown;
ToPoint(2,4);
ToPoint(1,5);
ToPoint(2,6);
ToPoint(5,7);
ToPoint(8,6);
ToPoint(9,5);
ToPoint(8,4);
ToPoint(3,2);
ToPoint(4,1);
ToPoint(6,1);
ToPoint(7,2);
ToPoint(7,4);
PenUp;
ToPoint(0,0)
end.
Объяснение:
Смотри картинку
program grib;
uses drawman;
begin
Field(10,10);
ToPoint(3,4);
PenDown;
ToPoint(2,4);
ToPoint(1,5);
ToPoint(2,6);
ToPoint(5,7);
ToPoint(8,6);
ToPoint(9,5);
ToPoint(8,4);
ToPoint(3,4);
ToPoint(3,2);
ToPoint(4,1);
ToPoint(6,1);
ToPoint(7,2);
ToPoint(7,4);
PenUp;
ToPoint(0,0)
end.
Объяснение:
Смотри картинку