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

Program Begin16;

Var
  x1, x2: Real;

Begin
  Readln(x1, x2);
  WriteLn('d = ', Abs(x2 - x1));

End.

Leave a Comment

+ 43 = 47