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

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016begin  var s:=ReadlnString('->');  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.2016begin  ReadlnString('->').ToWords.Where(w->Pos(w[1],'0123456789')=0).Printlnend.