質因子連乘式(III)

程式是根據網友王義之提供fx-3650P版本的質因子連乘式(III)程式修改以適合fx-50FH/50F PLUS使用,與質因子連乘式(I)程式比較,這個版本的程式除了可以顯示質因子,還可以顯示質因子的冪數,所以較為方便。

網友提供程式日期: 2008年1月24日

注意: 藍色程式碼 ˚ 是按 o,,,

程式 (88 bytes)

ClrMemory: Fix 0: ?→A: Lbl 1: 2M+: M=4M-:

MM>A => Goto 3: A - M Rnd( A÷M => Goto 1:

Lbl 2: A÷M→A: C+1→C: A=M Rnd( A÷M => Goto 2:

Mo + C÷60o◢ 0→C: Goto 1: Lbl 3: Norm 1: A
 

例題: 求 352的質因子連乘式。

按 Prog 1 再按 352 EXE (顯示 2˚5˚0,即是質因子為25)

EXE (顯示 11,非度分秒形式表示最後質因子為11)

所以 352 = 25 × 11

 

註1: 輸入的數值必須為正整數,否則計算會錯誤,程式計算的數值要小於 9999 9999 99。

註2: 程式完結時,最後會顯示1或1次冪的質因子(非度分秒形式表示)。

 

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

Free Web Hosting