f(x,y,a,b,n){y/a*x?f(b-y,x-1,b-a,a,n-1):putchar(x?n:10);}main(x){while(x<5e3)f(x++%56,x/56,55,89,57);}