{ll i,j,n;rd(n);rep(i,1,n)for(j=i;j<(n-i+1)/2;j++)wt(i,j,n-i-j);}