Помогите, прошу все балы отдаю
Сделать вот такое как на картинке
Без OnVector а с ToPoint. Прошу...
Помогитее

Ответ:

Привет, вот решение:

uses Drawman;

begin

field(3,3);

topoint(0,0);

pendown;

topoint(0,1);

topoint(1,1);

topoint(1,2);

topoint(2,2);

topoint(2,3);

topoint(3,3);

topoint(3,2);

topoint(2,2);

topoint(2,1);

topoint(1,1);

topoint(1,0);

topoint(0,0);

penup;

end.