Pascal Ввести текст, состоящий не менее чем из 12 слов. Из текста выделить все слова, которые начинаются с того же символа, с которого начинается последнее слово заданного текста.

Den4ikBLeT Den4ikBLeT    2   13.06.2020 01:42    4

Ответы
krasota33 krasota33  24.08.2020 23:18

// PascalABC.NET

begin

 var a := ReadString.ToWords;

 if a.Length < 12 then Print('Введено меньше 12 слов')

 else

 begin

   var c := a.Last.ToCharArray.Last;

   a.Where(p -> p.First = c).Print

 end

end.


Pascal Ввести текст, состоящий не менее чем из 12 слов. Из текста выделить все слова, которые начина
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика