Прямоугольники

uses drawman;
begin
 field(7,4);

 topoint(1,1);
 pendown;
 onvector(0,2);
 onvector(1,0);
 onvector(0,-2);
 onvector(-1,0);
 penup;


 topoint(3,1);
 pendown;
 onvector(0,2);
 onvector(1,0);
 onvector(0,-2);
 onvector(-1,0);
 penup;

 topoint(5,1);
 pendown;
 onvector(0,2);
 onvector(1,0);
 onvector(0,-2);
 onvector(-1,0);
 penup;
 
end.