Дан текст. посчитать количество слов, заканчивающихся на заданную букву и перенести их в другую строку, написав через запятую. вывести полученную строку на экран. написать программу на языке: pascal;

маьтвор маьтвор    1   24.08.2019 02:00    0

Ответы
dotafign9 dotafign9  08.09.2020 23:23
// PascalABC.NET 3.2, сборка 1387 от 20.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var aw:=ReadlnString('Введите строку:').ToWords;
  var c:=ReadlnChar('Введите букву:');
  var s:=aw.Where(w->w.Last=c).JoinIntoString(',');
  s.Println
end.

Пример
Введите строку: Моя замечательная и вообще чудесная строка
Введите букву: я
Моя,замечательная,чудесная

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