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

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
2 `. `2 T4 ]; X& f8 t程式例：
#1=1234.(將被分離的數據)
#1=ABS[FIX[#1]]
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
#3=501.(儲存到#501以上)
#10=10.(十的乘冪)
) H7 m: S9 m9 B: _) PWHILE[#2GT0.]DO1
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
#3=#3+1.
" x; x3 O- z$ w3 Q: m, \3 ?4 v#2=#2-1.
) G  _5 P8 m* |3 p% _#10=#10*10.(百-->千-->萬一直放大十倍)
END1
M0

# `+ ~5 q) w% j8 Y結果：
#501=4.
#502=3.
, D. S- F" u* g, w$ `#503=2.
) N9 L, Y5 S, Y3 i: F#504=1.
& i) @& A! r/ G  g& n2 l& \#1也可放入1011.類似2進制的運算
! f1 I& n* n$ q8 @4 y- U
8 O1 i& Q( i5 n! {0 S2 U請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

楼主试试 大于9位数的分解........这个更有意思

羅蓋仙

回复 2# jiangssli

% y- E( x5 U) z) E& Z( o7 I: G樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回复 3# 羅蓋仙


    哈哈.............要是你能让系统可以判断大于9位数的才是真的厉害啊...

1426437527

谢谢你分享的宏程式

VYF0412

感谢贴主分享经验感谢贴主无私分享宝贵知识，但是它具体用在什么地方