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