Help for this page

Select Code to Download


  1. or download this
    for($c=3429;$b=$c-=27;$e=$d%1e8){
 for(;--$b;){
  $d=$d*$b+($e?$f[$b]:2)*1e8;
...
 }
 printf$e?'%08d':'%d.',$e+$d/1e8
}
  2. or download this
    #        1         2         3         4         5         6
#234567890123456789012345678901234567890123456789012345678901
m_;--$h?$%=($f[$h]=$h--/2*$%+$f[$h%=7875]%$h*1e8)/$h:+printf$
a?"%08d":"3.",$a%1e8+($a=$%)/1e8for@f=(2)x5e5