Предмет: Информатика, автор: Аноним

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

Ответы

Автор ответа: SkyBy
0
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.
Похожие вопросы
Предмет: Информатика, автор: Аноним
Предмет: Английский язык, автор: Ksenia1527112003