複數的整數指數
程式編寫日期: 2007年11月15日
程式可以計算複數的實數冪，亦可以計算複數的N次方根，計算N次方根時只要輸入N-1或 1┘N即可。
程式需要在 CMPLX 模式下執行，因此在選擇新程式位置後，按 2 選用CMPLX模式。
注意: 紅色的 r 是按 shift Ans 2。
第一個程式 (38 bytes，不顯示根的模數及輻角)
ClrMemory: ?→A: ?→B: While B-1 > M:
Abs( A )^( B )∠( B ( 2Mπr + arg( A◢
1M+: WhileEnd
第二個程式 (42 bytes，同時顯示根的模數及輻角)
ClrMemory: ?→A: ?→B: Abs( A )^( B→C◢
While B-1 > M: 2BMπr + Barg( A◢ C∠Ans◢
1M+: WhileEnd
註: 若果想保留一些記憶用作儲存臨時數據，可將程式中"ClrMemory"改為"MM-"，而程式 長度增加 1 byte，所使用的記憶為A，B及M。
注意: 以下所有例題都假設是在DEG單位下進行，計算N次方根時只要輸入N-1或 1┘N即可。
例題1: 計算 10(cos30o + i sin30o) 的三次方根。
第一個程式的按法:
按 Prog 1 再按 10 Shift ∠ 30 EXE
3-1 EXE (-1冪代表計算N次方根，顯示第一個根的實數部為2.121703986)
Shift Re<=>Im (顯示第一個根的虛數部為0.374113657)
EXE (顯示第二個根的實數部為 -1.384843925)
Shift Re<=>Im (顯示第二個根的虛數部為1.650392722)
EXE (顯示第三個根的實數部為 -0.736860061)
Shift Re<=>Im (顯示第三個根的虛數部為-2.02450638)
EXE (顯示0，程式亦計算完結)。
第二個程式的按法:
按 Prog 1 再按 10 Shift ∠ 30 EXE
3-1 EXE (-1冪代表計算N次方根，顯示所有根的模數為2.15443469)
EXE (顯示第一個根的輻角為 10)
EXE (顯示第一個根的實數部為2.121703986)
Shift Re<=>Im (顯示第一個根的虛數部為0.374113657)
EXE (顯示第二個根的輻角為 130)
EXE (顯示第二個根的實數部為-1.384843925)
Shift Re<=>Im (顯示第二個根的虛數部為1.650392722)
EXE (顯示第三個根的輻角為 250)
EXE (顯示第三個根的實數部為-0.736860061)
Shift Re<=>Im (顯示第三個根的虛數部為-2.02450638)
EXE (顯示0，程式亦計算完結)。
所以三個根分別為 2.121703986 + 0.374113657i, -1.384843925 + 1.650392722i及-0.736860061 - 2.02450638i
例題2: 計算 4 + 5i 的三次方根。
第一個程式的按法:
按 Prog 1 再按 4 + 5i EXE
3-1 EXE (-1冪代表計算N次方根，顯示第一個根的實數部為1.774720263)
Shift Re<=>Im (顯示第一個根的虛數部為0.546429525)
EXE (顯示第二個根的實數部為-1.360581983)
Shift Re<=>Im (顯示第二個根的虛數部為1.26373807)
EXE (顯示第三個根的實數部為-0.41413828)
Shift Re<=>Im (顯示第三個根的虛數部為-1.810167596)
EXE (顯示0，程式亦計算完結)。
第二個程式的按法:
按 Prog 1 再按 4 + 5i EXE
3-1 EXE (-1冪代表計算N次方根，顯示所有根的模數為1.856937597)
EXE (顯示第一個根的輻角為 17.11339725)
EXE (顯示第一個根的實數部為1.774720263)
Shift Re<=>Im (顯示第一個根的虛數部為0.546429525)
EXE (顯示第二個根的輻角為 137.1133972)
EXE (顯示第二個根的實數部為-1.360581983)
Shift Re<=>Im (顯示第二個根的虛數部為1.26373807)
EXE (顯示第三個根的輻角為 257.1133972)
EXE (顯示第三個根的實數部為-0.41413828)
Shift Re<=>Im (顯示第三個根的虛數部為-1.810167596)
EXE (顯示0，程式亦計算完結)。
所以三個根分別為1.774720263 + 0.546429525i, -1.360581983 + 1.26373807i及-0.41413828 - 1.810167596i
例題3: 計算 (2 + 3i )5
第一個程式的按法:
按 Prog 1 再按 2 + 3i EXE 5 EXE (顯示實數部為 122)
再按 Re<=>Im (顯示虛數部為 -597 i)
計算完結後按 AC 終止程式
第二個程式的按法:
按 Prog 1 再按 2 + 3i EXE 5 EXE (顯示模數為609.3381655)
EXE (顯示輻角為281.5496624) EXE (顯示實數部為 122)
再按 Re<=>Im (顯示虛數部為 -597 i)
計算完結按 AC 終止程式
所以 (2 + 3i)5 = 122 - 597i