Begin16. Найти расстояние между двумя точками с заданными координатами x₁ и x₂ на числовой оси: |x₂–x₁|.
var x1, x2, d: real;
begin
  write('Введите координаты двух точек на числовой оси ->');
  readln(x1, x2);
  d:=abs(x2-x1);
  writeln('Расстояние между точками = ', d:6:2);
end.