Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Любовь1203
27.01.2020 19:57 •
Информатика
Нужно ! написать программу проверяющую, принадлежит ли число введенное с данной клавиатуры промежутку от 0 до 5. (0; 5) (а> 0) and (a< 5) начало: begin writeln('') if ; wriyeln(''); end.
Показать ответ
Ответ:
niggaeasyreal
24.06.2020 09:45
Program abc
var a:longint;
begin
Writeln('Введите число');
readln(a);
if a>0 and a<5 then writeln('Podhodit')
else writeln('Ne podhodit');
end.
0,0
(0 оценок)
Ответ:
vk20001
24.06.2020 09:45
Program zadanie;
var
a:real;
begin
readln(a);
if (а<0) and (a>5) then Writeln('принадлежит ') else
wriyeln('непринадлежит ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
yaaaaaaan
02.01.2021 19:18
Решите программу, определите значения a и b после выполнения фрагмента программы: a: =3789; b: =(a mod 1000) + 11; c: =b div 100; a: =(a div 1000) + b; b: = a+c;...
mlvov70
29.02.2020 19:32
Вопрос на который жизненно необходим ответ: как называется набор дополнительных инструкций предназначенных для ускорения процессов кодирования и декодирования потоковых данных,...
ЖеняРай
27.10.2022 00:45
Определите условие, чтобы цикл выполнился ровно 5 раза. i = 1 while i ...: print ( Привет! ) i = i + 1...
Masha72011
26.02.2022 07:39
Чему будет равно значение переменной z после выполнения фрагмента программы x := 15; y := 24; x := x div 6 + y mod 5; z := x + y div 7 mod 2;...
CherryyLou
26.06.2022 06:44
5“. Складіть проект для обчислення значення виразу a + b –с: (a - 2b) Збережіть проект у папці з іменем Завдання 6.4.5, створеній увласній папці....
alinashakeeva
05.09.2021 22:39
Что ввести надо чтобы закрасить как здесь циклами??...
karinalitvinova
09.12.2022 02:44
Выполни. ФО Найдите ошибки в программе для расчета суммы двух чисел. Напишите правильный вариант программы a=int(input()) b=int(input()) input (‘сумма’, a-b) 1. Выполни....
dinnaasv
11.04.2022 15:38
В одном доме живут Минченко, Крюков, Мирошников и Сидоренко. Один из них — физик, другой — художник, третий — писатель, а четвёртый — баянист. Известно, что: Ни Минченко,...
Pedors
17.05.2023 07:50
Дано число 633000000. Данное число можно представить в виде 6,33⋅10...
BackTiger007
04.01.2023 15:01
Дано число 1,6053−3. Нормализованная экспоненциальная запись данного числа:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:longint;
begin
Writeln('Введите число');
readln(a);
if a>0 and a<5 then writeln('Podhodit')
else writeln('Ne podhodit');
end.
var
a:real;
begin
readln(a);
if (а<0) and (a>5) then Writeln('принадлежит ') else
wriyeln('непринадлежит ');
end.