第一類貝塞爾函數 (Bessel Function of the first kind)

程式編寫日期: 2008年4月24日

程式可以計第一類貝塞爾函數 J_n(x) (Bessel Function of the first kind)，其中 n 為整數。

注意: π^r 是按 SHIFT EXP SHIFT Ans 2

程式 (58 bytes)

Mem clear: ?→A: ?→X: Lbl 0: M→C:

(X÷2)^(2B + A) cos π^rB ÷ B!(B+A)! M+:

B+1→B: M-C => Goto 0: M

計算第一類貝塞爾函數 J₃(1.3)的數值。

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

參考資料:

貝塞爾函數 -wikipedia

Bessel Fuction of the First Kind -- from Wolfarm MathWorld

Bessel Fuction Calculator

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