Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Alasp
05.03.2021 20:01 •
Информатика
Дано число определить является ли оно четным трехзначным? (на языке программирования)
Показать ответ
Ответ:
tyrko24111995
05.10.2020 15:12
Program n1;
var a: integer;
begin
readln(a);
if (a>99) and (a<1000) and (a mod 2=0)
then write('является') else
write('не является');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
leryn1999
08.09.2020 18:32
Доказать справедливость закона алгебры логики согласно варианту задания. Упростить логическое выражение и построить таблицу истинности согласно варианту задания....
Neronkilir228
10.05.2022 14:28
01001101 01101111 01100100 01100101 01101100; 01001000 01101111 01101101 01100101 расшифруйте !...
папа1231
03.10.2020 00:41
решить : ) АЛГОРИТМЫ ОПИСАНИЯ. ТИПИЧНЫЕ СХЕМЫ ОБРАБОТКИ ДАННЫХ...
nfxlxlhxoydoysoys
09.01.2021 19:34
ів Написати програму: Задано масив з n цілих чисел. Вивести його елементи в стовпчик, не змі- нюючи початковий порядок....
Katteerina25
10.07.2022 16:28
на коде python Создание игры Wizard Duel. Часть 1 СОДЕРЖАНИЕ Списки. Вложенные списки. . . . . . . . . . . . . . . . . . . . . . . 4 Создаем главный цикл игры Wizard...
hekita14
02.05.2020 00:41
Инструмент для измерения различных данных температуры скорости излучения цвета звука...
gfjew56df
29.07.2021 18:44
Задана матрица A(4,4). Вычислить небольшие элементы каждой строки матрицы. Результат получить в одномерном массиве B(4).Определить номер строки в которой значение...
Keenio
15.06.2021 04:30
КУДА ПОМЕЩАЕТСЯ РОБОТ В РИНГЕ...
andreikasuper
14.10.2021 10:02
Як потрібно записувати команди розгалуження, у яких використовується значення властивості Checked для прапорців? ...
1970nata
07.05.2023 06:16
Решить линейное уравнение 7/8-1/8(x-5/4-14-2x/5)=x-9/2-x-1/4...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a: integer;
begin
readln(a);
if (a>99) and (a<1000) and (a mod 2=0)
then write('является') else
write('не является');
end.