((b/9))||{ IFS=, read a n x x+=0000 s=$1 e=e[b=b*10000/x,++i/n] } printf $s%.3f $[b=x*$a,i=e,b-=x,x+=b/=n]1e-5&&s=, . * \\n
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page