Вывод Четных И нечетных (Более Сложная)

[darter96]

Вводится сначала число N, а затем N чисел. Выведите эти N чисел
в следующем порядке: сначала выводятся числа, стоящие на нечетных местах,
а затем - стоящие на четных местах.

Входные данные
Вводится число N (0<N<100), а затем N чисел из диапазона Integer.


Пример входного файла
7
2 4 1 3 5 3 1

Пример выходного файла
2 1 5 1 4 3 3
ЗАРАНИЕ БЛАГОДАРЕН!

[pa6kevi4]

На каком языке пишешь?

[ImmortalAlexSan]

Я бы загнал вводимые числа в массив и выводил бы их в очередности четности нечетности ИНДЕКСОВ ЭЛЕМЕНТОВ ЭТОГО МАССИВА, для этого можно использовать цикл FOR и каждый индекс делить на 2, если делится без остатка, то занести в ещё один, только пустой массив, и так до тех пор пока не переберете все элементы первоначального массива, а остальные, непопавшие под раздачу элементы, запишите следом за первыми в тот же массив. Потом выводите и вуоля.

[Анатоль]

Считай всё в массив, а потом выведи сначал числа стоящие на нечётных местах, а потом на чётных. Что тут может быть сложного?

[TzX]

Если язык паскалеподобный, то примерно так:

Var
  n,i:integer;
  a:array of integer;
Begin
  readln(n);
  For i:=1 to n do readln(a[i]);
  For i:=1 to n do if Frac(i/2)<>0 then write(a[i],' ');
  For i:=1 to n do if Frac(i/2)=0 then write(a[i],' ');
  readln;
End.

З.Ы. Код не проверял