9.65. Дано предложение. Определить:
а) число вхождений в него буквосочетания ро;
б) число вхождений в него некоторого буквосочетания из двух букв;
в) число вхождений в него некоторого буквосочетания.
// PascalABC.NET 3.0, сборка 1128
uses
System.Text.RegularExpressions;
begin
var s:=Пингвинёнок Пороро. Пороро - поросёнок;
Writeln(RegEx.Matches(s,ро).Count) // количество ро
end.
Тестовое решение:
5
// PascalABC.NET 3.0, сборка 1128
uses
System.Text.RegularExpressions;
begin
var s:=Пингвинёнок Пороро. Пороро - поросёнок;
var s1:=ReadLnString(Введите контекст для поиска:);
Writeln(RegEx.Matches(s,s1).Count)
end.
Тестовое решение:
Введите контекст для поиска: оро
3
Оцени ответ
