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

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
程式例：
#1=1234.(將被分離的數據)
% V* Z* U% @" J1 F/ c# k#1=ABS[FIX[#1]]
* d( O6 @1 e6 N9 t% B#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
#3=501.(儲存到#501以上)
#10=10.(十的乘冪)
WHILE[#2GT0.]DO1
, d- A" z" N. d5 B3 ^2 b#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
#3=#3+1.
#2=#2-1.
' [0 C2 i& _" B! s" A#10=#10*10.(百-->千-->萬一直放大十倍)
END1
M0
; l0 w9 {( U( T1 e0 \
結果：
( f6 n5 B, ^8 m8 m- q. N+ [#501=4.
3 k1 A5 J+ ]- g- r#502=3.
- W) w. ^& b( i! V" m' U; B4 r' D9 o#503=2.
#504=1.
#1也可放入1011.類似2進制的運算
3 F+ ^5 g+ {0 N, w$ U. G+ N+ q* o
# {' A( z5 l* I1 n) z- n: P請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

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

羅蓋仙

回复 2# jiangssli

. A& ]5 N$ D) U+ r0 A, A+ u樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回复 3# 羅蓋仙

$ X  _9 \9 m) t
: `' w2 D* q/ |3 a  [% k    哈哈.............要是你能让系统可以判断大于9位数的才是真的厉害啊...

1426437527

谢谢你分享的宏程式

VYF0412

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