Две задачки. Написать на PascalABC.NET.
1) Подсчитать количество слов, в которых встречаются только согласные.
2) Вывести на экран все слова, начинающиеся не с цифры.

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
  var s:=ReadlnString(-gt;);
  var a:=RegEx.Matches(s,\s([бвгджзйклмнпрстфхцчшщ]+)\s,
    RegexOptions.IgnoreCase);
  foreach var w in a do Writeln(w.ToString.Trim);
end.

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
  ReadlnString(-gt;).ToWords.Where(w-gt;Pos(w[1],0123456789)=0).Println
end.