begin
 init;
 penup;
 back(100);
 pendown;
 dcr(step,direction,length);
 close;
end.