Beta 函數 (Beta Fucntion)

更新日期: 2014年5月15日

這個程式可以計算Beta函數B(x,y)的數值,大約能夠準確至有效數字九至十位。

注意: e是按shift ex

程式 (1540 bytes)

Mem clear: ?→A: ?→B: A+B→C: Lbl 0:

A+3: (Ans + . 85)^(A - . 5) e - Ans (1.071370357

+ 39.41066934 ÷ A - 35.55136409 ÷ (A + 1) - . 0943944629 ÷ Ans

+ 6.326951402 ÷ (A + 2→D: M=0 => D→X => B→A:

M=1 => D→Y => C→A: M2M+ => Goto 0: XY÷D

 

例題: 計算 B(1.2 , 2.3)的值。

按 Prog 1 再按 1.2 EXE 2.3 EXE (顯示答案為0.322336825)

 

Beta 函數的參考資料:

1. Beta function - Wikipedia, the free encyclopedia

http://en.wikipedia.org/wiki/Beta_function

2. Beta Function -- from Wolfram MathWorld

http://mathworld.wolfram.com/BetaFunction.html

 

返回 fx-3650P及SC-185程式集

 

Free Web Hosting