Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Amanda173
19.04.2022 14:40 •
Информатика
Только нормально и на все вопросы, их 3.
👇
Увидеть ответ
Открыть все ответы
Ответ:
Yury28
19.04.2022
N1
var a, b: integer;
• begin
• readln(a, b);
• a := a mod 2;
b := b mod 2;
• if (b > 0) and (a > 0) then
• writeln ('четных чисел нет')
• else
• writeln ('четное число есть');
end.
N2
#include <iostream>
using namespace std;
int main()
{
int a;
cin >> a;
if(a < 100 || a > 999) cout << "Неверное число" << endl;
else
{
int a1 = a/100;
int a2 = (a/10)%10;
int a3 = a%10;
if(a1%2==a2%2==a3%2==0) cout << "Да" << endl;
else cout << "Нет" << endl;
}
return 0;
}
4,7
(97 оценок)
Ответ:
RomanPopov2005
19.04.2022
Program colors;
Uses crt;
var color: integer;
label l1;
Begin clrscr;
l1: write('Введите номер цвета color = ');
readln(color);
case color of 0: writeln('Черный');
1: writeln('Синий');
2: writeln('Зеленый');
3: writeln('Голубой');
4: writeln('Красный');
5: writeln('Фиолетовый');
6: writeln('Коричневый');
7: writeln('Светло-серый');
8: writeln('Темно-серый');
9: writeln('Ярко-синий');
10: writeln('Ярко-зеленый');
11: writeln('Ярко-голубой');
12: writeln('Розовый');
13: writeln('Малиноый');
14: writeln('Желтый');
15: writeln('Белый');
else
begin
writeln('Непривильный номер цвета');
writeln;
goto l1;
end;
end;
readln;
End.
4,6
(61 оценок)
Это интересно:
К
Компьютеры-и-электроника
16.04.2022
Как играть онлайн в Words with Friends...
К
Компьютеры-и-электроника
11.09.2020
Как сделать GIF анимацию из видео в Photoshop CS5: шаг за шагом...
С
Стиль-и-уход-за-собой
27.10.2021
10 простых способов быть привлекательной...
К
Компьютеры-и-электроника
04.03.2021
Как добавить фон на веб-страницу: простые шаги, которые помогут улучшить визуальное восприятие...
К
Компьютеры-и-электроника
30.03.2020
Секреты изменения списка близких друзей Facebook на iPhone и iPad...
С
Стиль-и-уход-за-собой
29.07.2020
Как замаскировать прыщик с помощью зеленого консилера: советы и рекомендации...
С
Стиль-и-уход-за-собой
13.07.2021
Как правильно мыть волосы: советы от профессионалов...
Д
Дом-и-сад
11.07.2020
Как быстро и эффективно очистить вентиляционное отверстие для сушилки одежды?...
Х
Хобби-и-рукоделие
15.02.2022
Как состарить дерево: советы для создания эффекта возраста...
13.09.2021
Как всегда выигрывать спор...
Новые ответы от MOGZ: Информатика
немагистор
13.08.2020
В корзине лежат 8 слив и 24 персика. Сколько бит информации несёт сообщение о том что достали персик?...
okcanaceninap06wvq
26.08.2021
До ть будь ласка ДУЖЕ ТРЕБА...
gulzanairgalievi
05.05.2022
Подберите дерево кодов под распределение частот. A=5 B=3 C=3 D=2 E=2 A=6 B=3 C=3 D=2 E=2 A=5 B=4 C=2 D=2...
lour1
20.08.2022
В таблице приведены за к поисковому серверу. Для обозначения логической операции «ИЛИ» в за используется символ «|», а для логической операции «И» — «&». Для каждого за указан...
dashaegirova
02.08.2020
Сочинение почему мне интересно изучать язык? 8-10 предложений...
Помагайтыыыы
02.08.2020
X+y 2 прочитать матиматическим языком...
themac9
02.08.2020
Отметьте цифрами к какому сословию относились категории населения франции: 1.духовенство.2.дворянство.3.третье сословие. 1)мелкая буржуазия. 2) епископы. 3) крупная буржуазия....
olgaalehina
02.08.2020
Какие из знакомых тебе явлений могли происходить много миллионов лет назад а какие нет?...
scumak399p07zdf
02.08.2020
Раставь скобки так чтобы равенства были верными 100-45+75: 5=76.100-45+75: 5=26.100-45+75: 5=70....
Krisru376
02.08.2020
Ссумма двух чисел равна 10, если первое число увеличить второе, то сумма станет 19 целых 1 3(я думаю понятно дробь).какие числа училка вообще жесть какая строгая...
MOGZ ответил
Скакого эпизода начинается роман «али и нино»? а) с урока в) с описания красот...
Цікаві факти про розселення первісних людей...
Напишіть будь ласка ,есе на тему що робить мене щасливим 1-2 сторінки...
Выполни умножение! а) 3,6*(-0,25) б)-1/7*14,56 в)0,75*(-480) г)-2 4/13*(-2,6)...
Каков должен быть объем нефтяного танкера , если он вмещает 60 т. нефти ?...
Канспект нидерландская революция причины, ход событий, итог. кратко...
Найдите значение функции f(x)=x(2x+3) при x=-1...
На заряд 25 нкл внесенный в некоторую точку электрически поля , действует сила...
1вставьте пропущенные буквы. (1)арктур (слепой пёс) слышал т..нчайшие звуки,...
Определите, является ли взятое из текста предложение сложноподчинённым. призывают...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
var a, b: integer;
• begin
• readln(a, b);
• a := a mod 2;
b := b mod 2;
• if (b > 0) and (a > 0) then
• writeln ('четных чисел нет')
• else
• writeln ('четное число есть');
end.
N2
#include <iostream>
using namespace std;
int main()
{
int a;
cin >> a;
if(a < 100 || a > 999) cout << "Неверное число" << endl;
else
{
int a1 = a/100;
int a2 = (a/10)%10;
int a3 = a%10;
if(a1%2==a2%2==a3%2==0) cout << "Да" << endl;
else cout << "Нет" << endl;
}
return 0;
}