分離數值，6位數8位數，如何分解???

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
  T* n$ p8 }; B' g. D. s4 U+ h程式例：
. J- `- _/ I/ k& I+ g: x2 {6 a! k#1=1234.(將被分離的數據)
+ }- r" X8 ^7 {( P# K; M6 C#1=ABS[FIX[#1]]
! T% B2 l. Z$ [#2=4.(幾位數，沒有大於4位用這招不劃算，一定要帶千元)
# k: p  T0 U: K/ }#3=501.(儲存到#501以上)
  J0 C/ T! ~; P#10=10.(十的乘冪)
WHILE[#2GT0.]DO1
4 _, u) g' z# ]! c. }( `#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
#3=#3+1.
  f8 w; F. R9 r$ J7 N. u1 C( j8 c#2=#2-1.
6 \( t1 e7 |% U; n/ B, |#10=#10*10.(百-->千-->萬一直放大十倍)
3 H: m  P  \" E: t3 I; o- |END1
' |: ^: G) O& t+ \. K+ ?M0
# o& ?( n6 A0 O; |5 `
結果：
#501=4.
1 O2 R' _, x/ \3 E0 ?$ I! m/ E$ e; L; `#502=3.
#503=2.
: C( L$ k2 j/ x/ R#504=1.
#1也可放入1011.類似2進制的運算
; Z; p9 v: [, ~' W7 G
+ t- V6 f% J# f' j$ A8 i% [8 X% K請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

樓主試試 大于9位數的分解........這個更有意思

羅蓋仙

回復 2# jiangssli
- F" o" x; s7 O) F9 Z
樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回復 3# 羅蓋仙


    哈哈.............要是你能讓系統可以判斷大于9位數的才是真的厲害啊...

1426437527

謝謝你分享的宏程式

VYF0412

感謝貼主分享經驗感謝貼主無私分享寶貴知識，但是它具體用在什么地方