Casio50 » fx-3x50P » Programs 程式集 » Base Converting 基數轉換 »
本式可把十進數 (可為非整數) 轉為二至九進數
<COMP> |
---|
? → D : ? → A : Fix0 : 0 → X : |
ln D ÷ ln A – . 5 : Rnd : Ans + ( 0 > Ans → C : |
Lbl 0 : D ÷ A ^ C – . 5 : Rnd : Ans → B : |
X + B 10 C → X : D – B A ^ C → D : |
C – 1 → C : D ≥ A ^ - 9 => Goto 0 : |
Norm1 : X |
88 Bytes |
一般操作 | 例子 |
---|---|
求n進制下d(10)的表達式 | 求3進制下0.3(10)的表達式 |
啟動程式 | 按 Prog 1 |
輸入資料 d EXE n EXE |
.3 EXE 3 EXE |
顯示答案 d(n) |
0.0220022 (...) |
A | n |
---|---|
B | LastDigit |
C | Max(LSD,-10) |
D | ε |
X | d(n) |
Y | 1 |
M |
d > 0