Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
веранастякрас
28.05.2021 07:55 •
Информатика
Pascal информатика. определить лежит ли число в диапазоне (-30,60) , 15
Ответ:
Ане4ка3
10.09.2020 16:59
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
if ReadReal.Between(-30,60) then Writeln('Входит')
else Writeln('Не входит')
end.
0,0
(0 оценок)
Ответ:
d1m4Y
10.09.2020 16:59
Var a:integer;
Begin
Read(a);
If (a>-30) and (a<60) then write('yes')
else write('no');
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
hctgdhtfh
13.08.2022 08:12
Проектирование ИС - это Выберите один ответ: a. процедуры обработки событий и модули форм и отчетов b. логически сложная, трудоемкая и длительная по времени работа, требующая...
BloodRainbow
18.05.2022 14:01
Информатика 1 Сообщение записано буквами 512-символьного алфавита содержит,37 символов какой объём он несёт? 2 Объём сообщения,содержащего 2048 символов,составил 2 Кбайта.Каков...
лимон2509
03.12.2021 07:43
source file not found verify that the file exists and that you can access it. не могу решить решить я вас умоляю даю...
alexaste
08.03.2023 16:11
Сколько бит информации в фразе Ученик, который учиться без желания, - это птица без крыльев...
Тимуркупцов123
30.06.2022 04:24
1. Дано х = 1010101(2), у=1111010(2). Найдите двоичное число z, удовлетворяющее условию x Варианты ответов Почему с обяснениями 1) 1111100(2) 2) 1010011(2) 3) 1100100(2)...
Бубльгум8888
26.06.2020 11:36
Текст объемом 0,5 мб содержит 524 288 символов. Какова мощность алфавита?...
romatopovsky
01.06.2020 16:51
Default-config.dat как сделать...
denbulking
28.06.2021 02:38
Напишите значение суммы и разности двух чисел двоичной системы: 110001 и...
Anilecchi
31.08.2022 17:46
Как выполняется обмен данными между окном командной строки или окном приложения MS DOS и другими окнами?...
Olga1618
01.08.2022 08:59
Нарисуйте схему программного обеспечения информационных технологий...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
if ReadReal.Between(-30,60) then Writeln('Входит')
else Writeln('Не входит')
end.
Begin
Read(a);
If (a>-30) and (a<60) then write('yes')
else write('no');
End.