Склавиатуры вводится натуральное число. нужно вывести ответ «да», если все его цифры четные, и ответ «нет» в остальных случаях. паскаль

KREZZOR KREZZOR    3   02.10.2019 01:20    1

Ответы
ruzali4 ruzali4  27.08.2020 11:13
PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018Внимание! Если программа не работает, обновите версию!

begin

 if ReadInteger.ToString.Any(c-> '13579'.Contains(c))

 then Print('Нет')

 else Print('Да')

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика