Задача на паскале Дана строка s, определить сколько раз в ней встречается слово k.
Задача на паскале
Дана строка s, определить сколько раз в ней встречается слово k.
Гость
Ответ(ы) на вопрос:
Гостьuses crt; var s,k:string; i,n:integer; begin read(s); read(k); for i:=1 to length(s) do if k=copy(s,i,length(k)) then n:=n+1; write(n); end.
Не нашли ответ?
Похожие вопросы