С клавиатуры вводится 5-значное число. Если первая и последняя цифры этого числа четные, вывести на экран "четные", в противном случае вывести "нечетные"
помогите пж

Ответы (1)

Терезия 08.02.2025 3

Var a,a1,a2:integer;
begin
readln(a);
a1:=a mod 10; //последняя цифра
a2:=a div 10000;//первая цифра
if (a1 mod 2 = 0)and(a2 mod 2=0) then
writeln('четные')
else
writeln('нечетные');
end.

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

ПРЕДМЕТЫ

С клавиатуры вводится 5-значное число. Если первая и последняя цифры этого числа четные, вывести на экран "четные", в противном случае вывести "нечетные" помогите пж

Думаешь ответы не верны?

С клавиатуры вводится 5-значное число. Если первая и последняя цифры этого числа четные, вывести на экран "четные", в противном случае вывести "нечетные"
помогите пж