с клавиатуры вводится строка состоящая из букв, знака пробела и циифр. определите количество цифр в этой строке

Question

Информатика

Христюха

14 марта, 12:24

с клавиатуры вводится строка состоящая из букв, знака пробела и циифр. определите количество цифр в этой строке

+1

Ответы (1)

Знаете ответ?

Деня · Answer 1

var

s : string;

i, c : integer;

begin

readln (s) ;

c : = 0;

for i : = 1 to length (s) do

if (ord (s[i]) > 47) and (ord (s[i] < 58) then inc (c) ;

writeln (c) ;

end.