Free Hosting

Free Web Hosting with PHP, MySQL, Apache, FTP and more.
Get your Free SubDOMAIN or or...
Create your account NOW at

Cheap Domains

Cheap Domains
starting at $2.99/year



程式可以計算兩個正實數的算術幾何平均 (Arithmetic-Geometric Mean)。


程式編寫日期: 2006年7月24日

程式 (37 bytes,使用記憶A及B)

?→A: ?→B: Lbl 0: √AB→B:

2-1( A + B2÷A→A:

A≠B => Goto 0: A


例題: 計算兩數 2及3的算術幾何平均值。

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


返回 fx-3650P及SC185程式集