until(print(f(input)),f(n,r)=fordiv(n,d,d<n&r=max(r,f(d)));r+n-(n\10+n\100)*9)