• Составьте программу, вычисляющую, сколько раз в строке X встречается слово Y. Строку X и слово Y введите с клавиатуры.

Ответы 1

  • var x,y,z:string; k,p,l:integer;beginwriteln('Введите строку:');readln(x);writeln('Введите слово:');readln(y);z:=x; k:=0;l:=length(y);p:=pos(y,x);while p>0 do begin k:=k+1; delete(z,p,l); p:=pos(y,z); end;writeln('k = ',k);end.Пример:Введите строку:мама мыла раму, мама мыла окно.Введите слово:мамаk = 2
    • Автор:

      ellison90
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years