Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
astafievaolga20
26.01.2022 08:52 •
Информатика
Определить, является ли данное число а, четным.
Показать ответ
Ответ:
ШиноаХиираги
20.09.2020 17:22
Var a:integer;
begin
write('A='); readln(a);
if a mod 2 = 0
then writeln('число ',a,' четное')
else writeln('число ',a,' нечетное')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
sofiyka4
04.01.2023 20:01
Составить алгоритм, который расчертит поле вертикальными и горизонтальными пунктирными линиями...
ironthewolf72
19.11.2022 05:48
1. Файл – це: a) місце на диску, де зберігаються документи;b) місце на диску, що містить інформацію та має ім’я;c) послідовність команд;d) елемент вікна.2. В ОС Windows...
Lera6807
28.07.2020 11:28
Задача 4: Обучение шахматам Маленькая Ева только учится играть в шахматы. Сегодня она узнала, как слон ходит по шахматной доске. Теперь она хочет понять, куда слон может...
Koshka1563
19.05.2020 07:11
Нужно переделать код из питона в паскаль n = int(input()) d = int(input()) if d == 1: print(n//7) else: print((n - (8 - d)) // 7)...
Horvatskiy
29.03.2023 19:09
1. З яких елементів складається таблиця? 2. Як можна здійснити перехід від однієї комірки до іншої?3. Як видалити рядок або стовпчик з таблиці?4. Які вкладки з’являються...
кам81
22.05.2022 13:15
решить задачу Pascal, 7 класс, закрасить помеченные клетки 4 задания во вложении...
roldugina78
07.08.2022 12:31
Выбери модель соответствующую следующему алгоритму первое создай цилиндр второе изменить размеры 2, 201,5 3 измениться цилиндра на стене Света 4 создать цилиндр 5 изменить...
rensatkontri
31.01.2020 04:03
Тест по ексель нужно сделать телеграмм там скину тест...
Ruslan2284612
07.03.2021 08:27
Конфігурація комп ютера для студента, письменника, кореспондента?...
DenisPalashyk
08.05.2022 15:54
Составить программу подсчета суммы 10 чисел....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('A='); readln(a);
if a mod 2 = 0
then writeln('число ',a,' четное')
else writeln('число ',a,' нечетное')
end.