Натуральное число, паскаль.

Question

Дима Ерымов Ученик (212), закрыт 8 месяцев назад

Дано натуральное число. Верно ли, что количество его цифр четное число?

Answer 1

Кол-во цифр в числе на 1 больше целой части десятичного логарифма числа.

 read(n);
if odd(trunc(log10(n))) then writeln('yes') else writeln('no')

Если log10 в твоей версии Pascal нет, вместо log10(n) надо: ln(n) / ln(10)