Вопрос, который вызвал трудности

Составьте программу, позволяющую найти количество цифр во введённой строке s

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

//Pascal ABC.Net
Var s:string;k:byte;
Begin
read(s);
for i:=1 to length s do
case s[i] of
'1','2','3','4','5','6','7','8','9','0': k+=1;
end;
writeln (k);
End.