Ответы на вопрос:
Var a: integer; begin write('a='); readln(a); if a mod 2 = 0 then writeln('число ',a,' четное') else writeln('число ',a,' нечетное') end.
Популярно: Информатика
-
Водин ряд стоят 5 домов, в которых живут люди разных национальностей....
aassdfgb07.01.2023 20:20 -
1)cколько байт будет занимать код рисунка размером 80x100 пикселей...
влад231421.11.2020 15:34 -
Информатика 10 класс производится одноканальная (моно) звукозапись...
rrrl110.12.2022 05:55 -
Производится четырёхканальная (квадро) звукозапись с частотой дискретизации...
бра429.01.2021 23:54 -
1)получить 16 форму внутреннего представления числа -39.375 в форме...
ghujftu26.06.2021 21:57 -
Написать шесть предложений у перфекті...
EvilVitaliy16.01.2022 05:38 -
При яких значеннях змінної має зміст вираження...
ника256905.12.2022 15:22 -
Прослушай текст. Определи верный вариант ключевых слов....
MDasha4503.03.2020 05:42 -
Обчисліть силу натягу нитки, якщо маса візка = 200...
1KateWeg130.08.2021 16:00 -
Что представляет собой сперматозоид...
den2424denoztwre08.10.2020 09:04