Следующую последовательность операторов ввода замените одним оператором: read(xl); read(y2); read(x3); read(x4).
Можно заменить на read(x1,y2,x3,x4);