Сортировкой массива

Дан массив x, состоящий из латинских букв. Исключить из него элементы, стоящие на чётных местах, затем элементы стоящие на нечётных местах упорядочить по неубыванию.

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

begin

 var x := SeqRandom(ReadInteger('n='), 0, 51)

     .Select(t -> t < 26 ? Chr(t + Ord('A')) : Chr(t - 26 + Ord('a')))

     .ToArray;

 x.Println;

 x := x.Where((v, i)-> i.IsEven).Order.ToArray;

 x.Println

end.

Пример

n= 50

rLGIlkFnyaqvPYweWjJMEtZHUTLPreSpqKAvvArnCAULROpFLo

ACEFGJLLPRSUUWZlpqqrrrvwy