Проверить истинность высказывания: «Точка с координатами (x, y) лежит внутри прямоугольника, левая верхняя вершина которого имеет координаты (x1, y1), правая нижняя — (x2, y2), а стороны параллельны координатным осям» — Pascal(Паскаль)

Program Boolean29;

Var
  x, y, x1, y1, x2, y2: Real;

Begin
  WriteLn('Введите точку (x,y)');
  ReadLn(x, y);
  WriteLn('Введите точку (x1,y1)');
  ReadLn(x1, y1);
  WriteLn('Введите точку (x2,y2)');
  ReadLn(x2, y2);
  WriteLn((y < y1) And (y > y2) And (x > x1) And (x < x2));

end.