1e4repeat(n,m:=n;while(m%10<(m=m/10|0)%10,m>9or n println))