z=zip[replicate x ' '|x<-[0..]]
s l=[x++b++b++x|(b,x)<-z l]++l
main=do x<-readLn;mapM putStrLn$reverse[b++x|(b,x)<-z$iterate s["/__\\","/\\"]!!(x-1)]