Question

Дана строка,подсчитать количество вхождений слова "кот" в данную строку в pascalABC.NET

Answer 1

Ответ:

var s: string;

begin

readln(s);

writeln(s.Matches('bкотb').Count());

end.