uses crt; var n,k:longint; begin readln(n); k:=1; repeat write(k,' '); inc(k,2); until k>=n; if k=n then write(k,' '); if k>n then k:=n else k:=k-1; repeat write(k,' '); dec(k,2); until k=0; readln; end.