Free Hosting

Free Web Hosting with PHP, MySQL, Apache, FTP and more.
Get your Free SubDOMAIN you.6te.net or you.eu5.org or...
Create your account NOW at http://www.freewebhostingarea.com.

Cheap Domains

Cheap Domains
starting at $2.99/year

check

算術幾何平均

程式可以計算兩個正實數的算術幾何平均 (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程式集