Предмет: Информатика,
автор: gekaterinka
Упорядочить слова по возрастанию их длин.
Ответы
Автор ответа:
0
// PascalABC.NET 3.2, сборка 1482 от 12.06.2017
// Внимание! Если программа не работает, обновите версию!
begin
ReadlnString('Введите слова через пробел:').ToWords
.Select(x->(x,x.Length)).OrderBy(x->x[1]).ThenBy(x->x[0])
.Select(x->x[0]).Println
end.
Пример
Введите слова через пробел: Карл у Клары украл кораллы Клара у Карла украла кларнет
у у Карл Карла Клара Клары украл украла кларнет кораллы
// Внимание! Если программа не работает, обновите версию!
begin
ReadlnString('Введите слова через пробел:').ToWords
.Select(x->(x,x.Length)).OrderBy(x->x[1]).ThenBy(x->x[0])
.Select(x->x[0]).Println
end.
Пример
Введите слова через пробел: Карл у Клары украл кораллы Клара у Карла украла кларнет
у у Карл Карла Клара Клары украл украла кларнет кораллы
gekaterinka:
спасибо
Интересные вопросы
Предмет: Українська мова,
автор: azonadanil41
Предмет: История,
автор: soniaappss2
Предмет: История,
автор: Аноним
Предмет: Математика,
автор: sabinaoirat
Предмет: Математика,
автор: salakhievaaygul75