do
input""a
b=a-a^0
?"digital_root(",a,")=",1+mod(b,9)loop