Дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран все слова, содержащие три буквы. Если таких слов нет, то вывести на экран сообщение об этом

Программа ищет и выводит все трехбуквенные слова, содержащие русские и/или латинские буквы в обоих регистрах. Слова могут разделяться любым количеством любых символов, кроме символа подчеркивания.// PascalABC.NET 3.2, сборка 1417 от 28.03.2017// Внимание! Если программа не работает, обновите версию!begin  var s:=ReadlnString('Вводите:');  var m:=s.Matches('\b\w{3}\b');  if m.Count>0 then m.Println  else Writeln('Нет трехбуквенных слов')end.Пример:Вводите: Как найти все слова, где букв - три?Как все где три