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

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

Comments

Сейчас немного усложню, чтобы с нулями работало

---

Все