Задача: Хитрая перестановка
Имя входного файла: tricky.in
Имя выходного файла: tricky.out
Ограничение по времени: 2 секунды
Ограничение по памяти: 64 мегабайта
Перестановкой длины n называется последовательность из n чисел каждая из которых встречается ровно 1 раз
Назовём перестановку хитрой, если для любых двух соседних чисел в перестановке разница межу ними больше или равна минимальному из них
Например перестановка:
(3,1,2,4)
Является хитрой, поскольку:
|3-1|≥min(3,1), | 1-2 | ≥min(1,2) и | 2-4| ≥min(2,4)
Дано число n. Найти хитрую перестановку длины n.
Program D;
Var
input,output:text;
n,i:integer;
Begin
Assign(input, 'tricky.in');
Reset(input);
Assign(output, 'tricky.out');
Rewrite(output);
readln(input,n);
for i:=1 to n do
if i mod 2 =1 then
write (output,n div 2+ i div 2+1,' ')
else
write(output,i div 2, ' ');
Close(input);
Close(output);
End.