Принадлежит ли число интервалам - PascalABC.NET
Формулировка задачи:
Дано действительное число. Принадлежит ли оно интервалам (1,1, 3] или [5, 10,3).
Решение задачи: «Принадлежит ли число интервалам»
textual
Листинг программы
begin var x := ReadlnReal('Число:'); writelnformat('(1.1, 3] - {0}', (x > 1.1) and (x <= 3) ? 'Принадлежит' : 'Не принаждлежит'); writelnformat('[5, 10.3) - {0}', (x >= 5) and (x < 10.3) ? 'Принадлежит' : 'Не принаждлежит'); end.
Объяснение кода листинга программы
- В первой строке кода происходит считывание числа из консоли с помощью функции ReadlnReal, которая ожидает ввода реального числа и возвращает его. Переменная, в которую считывается число, называется x.
- Затем выводится результат проверки принадлежности числа к интервалу (1.1, 3] с помощью функции writelnformat. Форматированная строка
(1.1, 3] - {0}
означает, что в месте {0} будет выведено значение переменной x. Функция ? : ? (оператор тернарного условия) проверяет, принадлежит ли число интервалу (1.1, 3], и возвращаетПринадлежит
илиНе принаждлежит
. - Аналогично выводится результат проверки принадлежности числа к интервалу [5, 10.3) с помощью функции writelnformat. Форматированная строка
[5, 10.3) - {0}
означает, что в месте {0} будет выведено значение переменной x. Функция ? : ? проверяет, принадлежит ли число интервалу [5, 10.3), и возвращаетПринадлежит
илиНе принаждлежит
.