Предмет: Информатика,
автор: 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:
спасибо
Похожие вопросы
Предмет: Информатика,
автор: Аноним
Предмет: Қазақ тiлi,
автор: sofalike747
Предмет: Українська мова,
автор: kitgadj
Предмет: Математика,
автор: Sitaus
Предмет: Геометрия,
автор: Reqwert