Решаю задачу из 9 лаборатной работы, где нужно построить забор. Что самое интересное, вроде все правильно прописываю по координатам, а в одном месте ошибка. Вот поглядите! Прикладываю код! Жду ваших комментов!

uses graphABC;
begin
setpencolor(clrandom);
setpenwidth(5);
setbrushcolor(clrandom);
var dl:=20;
var x:=100;
var y:=100;
for var i:=1 to 10 do
begin
 moveto(x,y);
lineto(x+50,y-50);
lineto(x+50,y-50);
 lineto(x-100,y);
 lineto(x,y-200);
 moveto(x+100,y);
end;
end.