let n=read_int()/2 let rec($)i?(s=String.make(n+abs i)' '^"X")_=s.[n-abs i]<-'X';i-1$print_endline s;;n$()