Даны три точки A, B, C на числовой оси. Точка C расположена между точками A и B. Найти произведение длин отрезков AC и BC — Pascal(Паскаль)

Program Begin18;

Var
  A, B, C: Real;

Begin
  ReadLn(A, B, C);
  WriteLn('Mul = ', Abs(C - A) * Abs(B - C));

End.

Leave a Comment

20 − 13 =