Question

Как написать эту программу?

Answer 1

Ответ:

uses drawman;

begin

 field(10, 10);

 topoint(5, 1);

 pendown;

 onvector(0, 1);

 onvector(-3, 0);

 onvector(2, 2);

 onvector(-1, 0);

 onvector(2, 2);

 onvector(2, -2);

 onvector(-1, 0);

 onvector(2, -2);

 onvector(-3, 0);

 penup;

end.