Введите с клавиатуры произвольные числа x и y , которые являются координатами двух точек на числовом луче .напечатайте сообщение о том ,находиться ли x справа или слева от точки y или падает в нее.

Var x,y: real;
begin
readln(x,y);
if x=y then writeln('точки совпадают');
if x<y then writeln('x левее') else writeln(' х правее');
end.