Question

Помогите пожалуйста составить алгоритм управления Чертёжником чтобы получился рисунок жирафа в полный рост

Answer 1

uses Drawman;
begin
field (13,25);
topoint(9, 20);
pendown;
onvector(2, -15);
onvector(0, -5);
onvector(-1, 0);
onvector(0, 5);
onvector(-1, 0);
onvector(0, -5);
onvector(-1, 0);
onvector(0, 5);
onvector(-3, 0);
onvector(0, -5);
onvector(-1, 0);
onvector(0, 5);
onvector(-1, 0);
onvector(0, -5);
onvector(-1, 0);
onvector(0, 7);
onvector(-1, -1);
onvector(0, 1);
onvector(7, 0);
onvector(-1, 13);
onvector(0, 3);
onvector(1, 1);
onvector(0, -1);
onvector(1, 1);
onvector(0, -1);
onvector(3, -1);
onvector(0, -1);
onvector(-3, -1);
penup;
topoint (0,0)
end.