Найти расстояние между двумя точками с заданными координатами x1 и x2 на числовой оси: |x2 − x1|. (программа Паскаль)

Question

Найти расстояние между двумя точками с заданными координатами x1 и x2 на числовой оси: |x2 − x1|.

Answer 1

const
pi = 3.14;

var
x1, x2: real; { <-- Координаты точек на прямой }

begin
write('x1 = ');
readln(x1);
write('x2 = ');
readln(x2);
writeln('Расстояние между точками: ', abs(x2 - x1));
readln
end.