for(n=readline(o=i=j=0);o++<n?j?it[--j]+=' '+o:it[j=i++]=o:--i|print(it[i]););