read*,m,n;n=m-n-2;print'(99999a1)',((((49-0**abs((i-j)*(i-k)*(i-l)),i=1,m),10,j=k+1,m),k=l+1,m-1),l=n,n*(m-2));end