Question

Помогите записать на языке Паскаль!
Задача. Дано длинное число (записать, как строку) составить из его цыфр минимальное число, используя все цифры. 0 в начале ставить нельзя, только после первой цифры.
Заранее спасибо.

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString.OrderBy(c->c).ToArray;
  var i:=s.FindIndex(t->t<>'0'); Swap(s[0],s[i]);
  s.Println
end.

Пример
54560345345601323451233903454658345034521212
10000111222223333333334444444455555555566689