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

Question

Информатика

Лексей

10 июня, 17:21

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

+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.