Кількість даних цифр в числі

Підрахувати кількість цифр a в числі n.
Вхідні дані
У першому рядку записано одне ціле 32-розрядне число N.
У другому рядку записано одну цифру а.
Вихідні дані
Одне число - розв'язок задачі.


Вхідні дані
25557
5
Вихідні дані
3
 


 
program kilkist;
var a,b : string;
k,i : integer;
BEGIN
readln(a);
readln(b);
k:=0;
for i:=1 to length(a) do
if a[i]=b then k:=k+1;
writeln(k);

END.

Немає коментарів:

Дописати коментар