Question

На числовой оси дан отрезок [a, b]. Принадлежит ли точка А с координатой Х данному отрезку.
решить в паскале дам 20 балов

Answer 1

===== PascalABC.NET =====

begin

 var (a, b) :=

     ReadInteger2('Укажите координаты начала и конца отрезка:');

 var x := ReadInteger('Укажите координату точки А:');

 if x.InRange(a, b) then

   Println('Точка принадлежит отрезку')

 else

   Println('Точка не принадлежит отрезку')

end.