{* Задача288 *}

REM basic

' Изменить порядок элементов массива Х таким образом, чтобы элементы с четными номерами заняли позиции элементов с нечетными номерами и наоборот



INPUT n
Dim a(n)
For i = 1 To n
    {   INPUT a(i)
}    a(i) = i
Next
For i = 1 To n
    PRINT a(i);
Next
For i = 2 To n Step 2
    SWAP a(i - 1), a(i)
Next
PRINT
For i = 1 To n
    PRINT a(i);
Next