дан массив из 20 слов отсортировать слова по количеству букв в слове от меньшего к большему

Ответы

Ответ дал: Аноним
0
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
  var a:=ReadArrString('Введите слова построчно',20);
  a.OrderBy(x->x.Length).Println
end.

Тестовое решение:
Введите слова построчно Январь
Февраль
Март
Апрель
Май
Июнь
Июль
Август
Сентябрь
Октябрь
Ноябрь
Декабрь
Понедельник
Вторник
Среда
Четверг
Пятница
Суббота
Воскресенье
ЭтоВсе!
Май Март Июнь Июль Среда Январь Апрель Август Ноябрь Февраль Октябрь Декабрь Вторник Четверг Пятница Суббота ЭтоВсе! Сентябрь Понедельник Воскресенье


Ответ дал: Аноним
0
Вот такой он, современный Паскаль! )))
Ответ дал: Kamellaru51
0
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
  var a:=ReadArrString('Введите слова построчно',20);
  a.OrderBy(x->x.Length).Println
end.

Тестовое решение:
Введите слова построчно Январь
Февраль
Март
Апрель
Май
Июнь
Июль
Август
Сентябрь
Октябрь
Ноябрь
Декабрь
Понедельник
Вторник
Среда
Четверг
Пятница
Суббота
Воскресенье
ЭтоВсе!
Май Март Июнь Июль Среда Январь Апрель Август Ноябрь Февраль Октябрь Декабрь Вторник Четверг Пятница Суббота
Похожие вопросы