Задача на паскале Дана строка s, определить сколько раз в ней встречается слово k.

Есть ответ
17.12.2022
285

Ответ


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.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.