Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
FedorAche
29.11.2021 09:30 •
Информатика
Пользователь вводи число x с клавиатуры вывести да если это число принадлежит отрезку[1.15] в противном случае-нет. решить, надо
Ответ:
Aidanok1
28.07.2020 12:22
var x: integer;
begin
write('Введите число: ');
readln(x);
if x in [1..15] then write('Да')
else write('Нет')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Jdudn
31.10.2021 00:16
Даны три числа. найти среднее арифметическое из наибольшего и наименьшего из этих чисел. pascal...
ОлесяБычкова
17.04.2023 16:40
Вывести на экран все нечетные числа из диапазона от a до b, кратные 7(a =b)...
arinab01p0c2kd
03.02.2020 17:38
Сборник стихов состоит из 5 выпусков, в каждом выпуске 60 страниц, на каждой странице 60 строк по 35 знаков. сколько дискет объёмом по 360 кбайт надо для записи выпусков?...
Diana6079
03.02.2023 03:05
1)вывести на экран все двухзначные числа, в записи которых есть цифра 3 2)все четырехзначные числа, в которых две средние цифры разные....
OMGKristallikOMG
27.07.2021 06:16
Поделить столбиком так же как на примере...
osokina78
10.08.2021 02:45
10 услуг предоставляемых компьютерных услуг...
Dashylik228
20.02.2022 17:04
1)повторить 14 раз вывод слова повтор в столбик . 2)вывести на экран все целые числа из диапазона от 200 до 600, оканчивающую на любую четную цифру. pasca...
Termenator73
30.05.2023 07:33
Дано n целых чисел. найти количество элементов последовательности, у которых равные соседи (слева и справа). последовательность рассматривается замкнутой в кольцо, т.е. для первого...
dimon2512
12.11.2020 16:53
Чтобы перевести гбайт/с в мбайт/необходимо гбайт/с (умножить / разделить) на (1024/8)...
makareevakarina17
07.04.2022 14:44
[email protected]что подразумевается под языком программирования?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
write('Введите число: ');
readln(x);
if x in [1..15] then write('Да')
else write('Нет')
end.