Определить, сколько раз в числе встречается цифра a

@Вася123 · Регистрация: 28.11.2012

Author24 — интернет-сервис помощи студентам

3.дано натуральное число x. Сколько раз в нём встречается цифра a?

@Midian · 25.04.2013, 10:40

Pascal

var
str1,str2: string;
i,k: byte;
begin
write('Введите число: ');
readln(str1);
write('Введите число для поиска: ');
readln(str2);
k:=0;
for i:=1 to length(str1) do
if (str1[i] = str2) then
begin
inc(k);
end;
writeln('Встречается ',k,' раз');
end.

@Вася123 0 / 0 / 0 Регистрация: 28.11.2012 Сообщений: 6
		1
	Определить, сколько раз в числе встречается цифра a 24.04.2013, 19:43. Показов 1315. Ответов 1 Метки нет (Все метки) 3.дано натуральное число x. Сколько раз в нём встречается цифра a? 0

	25.04.2013, 10:40

Опции темы

Определить, сколько раз в числе встречается цифра a

Решение