range(10,9999){m:it;while(m>9){if(m/10%10<=m%10)break;m/=10;}m>9||it.p;};