Imgur . com / uGU6pYw пробелы уберешь...P.S слева будет стрелочка с ''6 раз''-нужно будет задать для все переменных writeln и readln... и там строчка if (x>=x1) and (x<=x2) and (y>=y1) and (y<=y2) then (просто она плохо видна...) P.S в ссылке пробелы убери