Написать программу, которая запрашивает с клавиатуры целое число и сообщает «Четное» или «Нечетное» это число. Pascal ABC

3 Окт 2019 в 20:42
214 +1
0
Ответы
1

program EvenOrOdd;

var
num: Integer;

begin
Write('Введите целое число: ');
Readln(num);

if num mod 2 = 0 then
WriteLn('Четное')
else
WriteLn('Нечетное');
end.

19 Апр 2024 в 15:00
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир