m@main=readLn>>=print.(!1)>>m 0!_=0 x!d=div x d!(d+1)*10+mod x d