Pascal Ввести текст, состоящий не менее чем из - вопрос №1213507121 от Варёна 15.02.2022 12:19

Question

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

Варёна · Answer

// PascalABC.NETbegin  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  endend....