黎曼函數

程式編寫日期: 2008年2月29日

程式(90 bytes)

ClrMemory: ?→A: 1→C: 1→D:

For 1→B To 24: DB-1 ^(A)C (-1) ^(B - 1 M+:

B=12 => 4095→C: Ans => 163-1→D:

B>12 => C - 12 nCr (B - 12→C:

Next: M ÷ (1 - 2 ^(1 - A

註1: 若果想保留一些記憶用作儲存臨時數據,可將程式中"Mem clear"改為"MM-",而程式長度增加 1 byte,所使用的記憶為A, B, C, D及M。

註2: 程式使用重複計算黎曼函數的數值,因此程式計算時間會較長。

 

例題: 計算黎曼函數ζ(3)的值。

按 Prog 1 再按 3 EXE (顯示答案為1.202056903)

 

註3: 有關黎曼函數(Riemann Zeta Function),可以參閱以下網址的資料:

Riemann Zeta Function -- from Wolfram MathWord

Riemann Zeta Function -- Wikipedia

 

 

返回 CASIO fx-50FH、fx-3650P II、fx-50FH II及fx-50F PLUS 程式集

Free Web Hosting