Дана строка символов, состоящая только из цифр. Определить, сколько раз среди них встречается цифра 5.

Question

Ариша

20 октября, 11:17

+3

Ответы (1)

Знаете ответ на вопрос?

Игнатий · Answer 1

Var s: string; i, k: integer;

Begin

k:=0;

Read (s) ;

for i:=1 to length (s) do

If s[i]='5' then k:=k+1;

Writeln (k) ;

End.