Работа с паскаль : даны координаты точки на плоскости (x,y). выясните, лежит ли эта точка внутри квадрата, две стороны которого лежат на положительных ветвях осей координат. длина стороны квадрата равна 5.

{т.е. квадрат лежит на оси x начиная от 0 до 5, т.к. сторона квадрата =5, аналогично и с осью y, отсюда условия x>=0  x<=5   y>=0   y<=5}
var
x,y:real;
begin
    readln(x,y);
          if (x>0)and(x<5)and(y>0)and(y<5)then
              writeln('попадает')
           else
              writeln('не попадает');
end.