ТутРешу.Ру

Задача на паскалеДана строка s…

Задание:

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

Решение:

uses crt; var s,k: string; i,n: integer; beginread (s); read (k); for i: =1 to length (s) doif k=copy (s,i,length (k) then n: =n+1; write (n); end.




Знаете другой ответ?

Отправить свой ответ