while(n:?read(?-,?-,~))#~do dispterms(sum((d:mod(n,a)*10^a/10,n:fix(n/a),d),a,1,11));
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page