Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
danilmuratov20p02c8m
05.09.2020 15:15 •
Информатика
Pascal информатика. определить лежит ли число в диапазоне (-30,60) , 15
Ответ:
Kastrulya1
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 оценок)
Ответ:
olgailinsk
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 оценок)
Популярные вопросы: Информатика
Mimimishkaaaa
29.05.2021 03:18
Укажите вид информации для каждого изображения. Номер 2...
kornsergo23
15.02.2022 11:30
Задания. 1. Дополните предложение.Эргономика- наука, об эффективной организациисцелью создания благоприятных условий для человека с учетом физическихи психологических особенностей...
cherry1527
15.11.2021 10:34
Автоматическое устройство осуществило прекодировку информационного сообщения,первоначально записанного в 7-битномкоде ASCII,в 16-битную кодировку Unicode.При этом информационное...
German22848
13.03.2020 20:08
Можете сказать посючему так происходит. Мне надо в программу ввести десятичну дробь, но как только я ввожу такое число программа завершается....
MaksimSulteev
10.02.2023 15:16
Определите, какое количество информации содержится в сообщении «я изучаю информатику-науку об информации! »....
yulokkons
19.10.2022 23:03
Мне нужно выполнить циклом нц и кц слово информатика а то у меня пишут нет такого !...
Камелия1231
13.04.2022 00:11
Прочитайте. спишите, ставя имена существительные из скобок в винительном падеже. (марка,конверт), ( повесил(бельё,верёвку),вбил(гвоздь,стена), уронил(ручка,стол), поставил(роза,ваза),...
толик147
03.10.2022 12:20
1.)постройте график функции у=3х-5.найдие координаты точки пересечения этого графика с прямой у=х+82. 2)в треугольнике авс- угол а=70(градусов),угол с=55(градусов) а)докажите...
Darina0090
04.12.2020 19:26
Какое назначение штрихпунктирной линии?...
3085729qwtio
13.04.2022 00:11
Составить предложение с одним из словосочетаний. широкие поля,лесная тропа,стальное кольцо,морская волна,грачиное гнездо,полевой цветок,сосновые леса,цветной ковёр,ядовитые...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.