|
|
馬上注冊,結交更多好友,享用更多功能,讓你輕松玩轉社區
您需要 登錄 才可以下載或查看,沒有賬號?立即注冊
×
分離數值,6位數8位數不必煩惱了,我幫你寫好了
3 K5 s0 ^- i) R% X程式例:
& r1 S" t; s6 M' \* `3 C* U$ q#1=1234.(將被分離的數據)
' K8 B0 ` G6 L% i#1=ABS[FIX[#1]]
0 `7 @; P2 g' _ F#2=4.(幾位數,沒有大於4位用這招不劃算,一定要帶千元)
7 C: H, d! K! k#3=501.(儲存到#501以上)% a9 C1 {: T3 K _) ?" j; m; u
#10=10.(十的乘冪) o. ]# Y0 f7 c [4 o
WHILE[#2GT0.]DO1
0 ?; W% Q7 b! K3 t8 I9 o6 L#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]], v, N0 O y# G. b5 ^$ S' }) L
#3=#3+1.
) D; l F, }; i, w% u#2=#2-1.
0 ?! E6 r( n: i" A. `#10=#10*10.(百-->千-->萬一直放大十倍)
# F* P% s0 D/ i6 vEND1' I1 u$ h& g% K# f" t* \( ?
M02 p, g6 x" a, Z2 Q- R
9 {( l2 h2 v- a, M" Q
結果:
, R5 n' J" V: I: N) l7 N0 X#501=4." a1 l# _: v2 p* r, e7 \4 s1 \
#502=3.
. ^/ b% K l. r0 f7 L#503=2.
0 d1 S4 K8 m" @$ ?#504=1.
- G4 ^% y; N0 o$ `7 I#1也可放入1011.類似2進制的運算
, W% \: }5 c( U- l v7 w- f
( l Y1 Q" w7 c1 I9 Z. e請問你有其他更佳的寫法嗎?請提出來謝謝 |
|