Question

Написать программу, при выполнении которой выводится 1, если введенное число x принадлежит отрезку [a, b], где a и b заданные пользователем числа, и выводится 0 в противоположной ситуации. Напишите именно в паскале. Очень срочно надо

Answer 1

Ответ:

PascalABC.NET

begin

 var rng := Range(ReadInteger('a = '), ReadInteger('b = '));

 var x := ReadInteger('x = ');

 if rng.Contains(x) then print(1) else print(0);

end.