9 lines
213 B
Text
9 lines
213 B
Text
|
Debug "Gamma()"
|
||
|
|
For i = 12 To 15
|
||
|
|
Debug StrD(i/3.0, 3)+" "+StrD(Gamma(i/3.0))
|
||
|
|
Next i
|
||
|
|
Debug ""
|
||
|
|
Debug "Ln(Gamma(5.0)) = "+StrD(GammLn(5.0), 16) ; Ln(24)
|
||
|
|
Debug ""
|
||
|
|
Debug "Factorial 6 = "+StrD(Factorial(6), 0) ; 72
|