Запишите алгоритм определения принадлежности. точки Х отрезку [А; В] с использованием комбинациииз двух ветвлений.

program AAA;

var A, B ,X :real;

begin

readln(A,B,X);

if X > A then

   if X< B then

       writeln(Прин)

    else 

       writeln(Не прин)

else

    writeln(Не прин)

 

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку