[Bargest]

сначала делаешь так:

Код:

for i:=1 to n div 2 do
 b[i]:=a[i*2];

А потом запускаешь по массиву B пузырьковую сортировку. Этого полно в гугле на всех существующих языках.