Question

Ввести целое число и определить, верно ли, что в нём ровно одна цифра 9

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  Writeln((ReadInteger.ToString.Where(t->t='9')).Count=1)
end.

Примеры
35423
False

13290192
False

132903
True