Question

помогите решить   1и2 пожалуйста

Answer 1

uses Drawman;
begin
Task('a2');
  ToPoint(3,2);
  PenDown;
  OnVector(2,2);
  OnVector(-4,2);
  PenUp;
  OnVector(7,-1);
  PenDown;
  OnVector(-3,-1);
  OnVector(2,-3);
  PenUp;
  ToPoint(0,0);
end.

uses Drawman;
begin
  Task('a3');
  ToPoint(2,1);
  PenDown;
  OnVector(4,0);
  PenUp;
  OnVector(-3,1);
  PenDown;
  OnVector(0,3);
  PenUp;
  OnVector(1,-1);
  PenDown;
  OnVector(5,-1);
  PenUp;
  ToPoint(0,0);
end.