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

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку