input""a b=a/mod(a,9) while(a>=1)?a if!a-b b=b/10 a=a-b wend ?0