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

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