Casio50 » fx-3x50P » Programs 程式集 » Number Thoery 數論 »

Prime Factorization
質因數分解

本式可分解一整數至一些質數

<COMP>
? → X : 2 → A :
Lbl 0 : X ÷ A → Y : Fix0 : Rnd : Norm1 :
Ans = Y => Y → X => A ◢ Ans => Goto 0 :
A + 2 – ( A = 2 → A : √ X > A => Goto 0 : X
58 Bytes

操作方法

一般操作 例子
質因分解
x
質因分解
666222
啟動程式 Prog 1
輸入數字
x EXE
[X?] 666222 EXE
顯示質因數
p1 EXE p2 EXE p3 EXE p4 EXE ...
(x = p1 p2 p3 p4...)
(註: 最後一個質因數會以 [X] 顯示)
[A] 2 EXE
[A] 3 EXE
[A] 37 EXE
[X] 3001 EXE

記憶體

A ceil(√pn)
B  
C
D
X pn [Last Prime]
Y pn or A
M  

相關程式

  1. Greatest Common Divisor / 最大公因數