Pascal Ввести текст, состоящий не менее чем из 12 - вопрос №1350689612 от ibrunetochka 22.11.2020 08:56

Question

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

ibrunetochka · 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....