Задано значение строковой переменной. Определить сколько раз буква "к" встречается в данной строке.

Question

Информатика

Ратмир

12 апреля, 20:01

Задано значение строковой переменной. Определить сколько раз буква "к" встречается в данной строке.

+2

Ответы (1)

Знаете ответ?

Самсон · Answer 1

Данная программа написана для Pascal:

var s:string;

i, k:integer;

begin

writeln ('введите текст') ;

readln (s) ;

k:=0;

for i:=1 to length (s) do

if s[i]='к' then k:=k+1;

if k=0 then writeln ('ни разу') else writeln (k) ;

end.