do input""n d=mod(n-n^0,9) ?"digital_root(",n,")=",d+1loop
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page