Две . написать на pascalabc.net. 1) подсчитать количество слов, в которых встречаются только согласные. 2) вывести на экран все слова, начинающиеся не с цифры.

фирузаалиева фирузаалиева    1   12.08.2019 03:40    0

Ответы
vasah vasah  04.10.2020 12:35
// 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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика