Задано двухзначное число. составить программу, которая отвечает на вопрос, правда ли, что все его цифры чётные

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger(Введите двухзначное натуральное число:);
  if (n div 10).IsEven and (n mod 10).IsEven then Writeln(Да)
  else Writeln(Нет)
end.

Пример
Введите двухзначное натуральное число: 28
Да

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