Average loop length: Difference between revisions
Content added Content deleted
Line 3,218: | Line 3,218: | ||
c@ = 0 |
c@ = 0 |
||
For b@ = 1 |
For b@ = 1 To a@ |
||
d@ = FUNC(_Fdiv(FUNC(_Factorial(a@)), a@^b@)) |
d@ = FUNC(_Fdiv(FUNC(_Factorial(a@)), a@^b@)) |
||
c@ = c@ + FUNC(_Fdiv (d@, FUNC(_Ntof(FUNC(_Factorial(a@-b@)))))) |
c@ = c@ + FUNC(_Fdiv (d@, FUNC(_Ntof(FUNC(_Factorial(a@-b@)))))) |
||
Line 3,229: | Line 3,229: | ||
e@ = 0 |
e@ = 0 |
||
For c@ = 1 |
For c@ = 1 To b@ |
||
f@ = 1 : d@ = 0 |
f@ = 1 : d@ = 0 |
||
Do While AND(d@, f@) = 0 |
Do While AND(d@, f@) = 0 |