Предмет: Информатика,
автор: Аноним
Дана строка символов, состоящая только из цифр. Определить, сколько раз среди них встречается цифра 5.
Ответы
Автор ответа:
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.
Begin
k:=0;
Read(s);
for i:=1 to length(s) do
If s[i]='5' then k:=k+1;
Writeln (k);
End.
Похожие вопросы
Предмет: Геометрия,
автор: hristinakrucenik
Предмет: Информатика,
автор: Аноним
Предмет: Английский язык,
автор: Ksenia1527112003
Предмет: Литература,
автор: делька56
Предмет: Алгебра,
автор: Den4ik046