Напишите программу, которая сортирует по возрастанию все элементы массива с нечётными номерами - Pascal

Формулировка задачи:

Здравствуйте,помогите пожалуйста написать код.Напишите программу, которая сортирует по возрастанию все элементы массива с нечётными номерами. При этом все элементы с чётными номерами должны остаться на своих местах. Нумерация элементов массива начинается с единицы. Входные данные Первая строка содержит размер массива N . Во второй строке через пробел задаются N чисел – элементы массива. Гарантируется, что 0 < N ≤ 100000 . Выходные данные Программа должна вывести все элементы отсортированного массива в одну строку, разделив их пробелами. Примеры входные данные 6 6 5 4 3 2 1 выходные данные 2 5 4 3 6 1

Решение задачи: «Напишите программу, которая сортирует по возрастанию все элементы массива с нечётными номерами»

Листинг программы

for i:=1 to n-1 do
  if Odd(i) then 
    for j:=i+1 to n do
      if Odd(j) and (a[i]>a[j]) then

Объяснение кода листинга программы

Создается цикл for для переменной i от 1 до n-1.
Проверяется условие: если i нечетное.
Вложен цикл for для переменной j от i+1 до n.
Проверяется условие: если j нечетное и значение элемента массива a с индексом i больше значения элемента массива a с индексом j.
В случае выполнения условия происходит какая-то операция (не указана в предоставленном коде).