Ответ:
var s: string;
begin
readln(s);
writeln(s.Matches('\bкот\b').Count());
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var s: string;
begin
readln(s);
writeln(s.Matches('\bкот\b').Count());
end.