n=scan("stdin") for(i in 1:n){a=rep(" ",max(i,n-i));a[i]=a[n-i+1]="X";cat(a," ",sep="")}