| |
|
|
p.specht
| Stellenzahl von Faktoriellen x!, aus x berechnet:
WindowTitle "Stellenzahl einer Fakultät(n) via Bernoulli-Koeffizienten-Näherung"
cls:declare n!:loop:
input n!' Achtung: das ! kennzeichnet Profan-Float, nicht das "Fakultät"-Zeichen...
print int(1+((n!+.5)*ln(n!)-n!+1/(12*n!)-1/(360*n!^3)+1/(1260*n!^5)1/(1680*n!^7)+ln(2*@Pi())/2)/ln(10))
goto "loop"
P.S.: Die Faktorielle einer Zahl n>5 hat ca. int(n/4+0.5)-1 Folgenullen ! |
|
|
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 14.06.2021 ▲ |
|
|
|