include../local/euphoria/include/get.e object n while 1do n=get(0)printf(1+n[1],"digital_root(%s%d)=%s%d\n",n&1+remainder(n-1,9))end while
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page