(while 1(#(println(str"digital_root("%2")="(->%2%%%)))#(apply +(for[%(str%)](-(int%)48)))(read)))