n;k;main(i){for(;500>k;n=n<1?k+=i=n||printf("%d\n",k):n-k/i%10)i=i/10?:1e4;}