while(0<1)for(c<-"+";n=readInt;i<- -n to n;s="|"*(n-i.abs))println(s+Seq(c+"-"*(i.abs*2-1)+c," ")(1>>i)+s)