Выполнить сортировку элементов, записанных на нечётных местах. в программе pascal.. 50

PascalABC.NET 3.4.2, сборка 1827 от 08.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(ReadInteger('n='), -50, 50);

 a.Println;

 a := a[::2].Sorted.Interleave(a[1::2]).ToArray;

 a.Println

end.