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

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
: }9 [) ]- L! b1 c6 L: L1 n程式例：
" G7 U: g. X% w& {6 D' G1 J( V#1=1234.(將被分離的數據)
#1=ABS[FIX[#1]]
% M: e3 Q/ U8 b8 V) r#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
* g4 x% S; Y0 k& m& T' G9 q#3=501.(儲存到#501以上)
: K! b( G- R4 d  y7 X& P#10=10.(十的乘冪)
8 g, I3 T. I( U/ p! t/ Q: y2 uWHILE[#2GT0.]DO1
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
# e% @6 M) h! q" J#3=#3+1.
#2=#2-1.
% M0 I0 |6 I# \5 z' Q. ]4 u: ?#10=#10*10.(百-->千-->萬一直放大十倍)
$ C0 c  U' o4 e( f+ e7 cEND1
% `- B$ j% Z9 r7 ~* |M0

結果：
#501=4.
1 S) F1 g  H" _% z#502=3.
#503=2.
" |4 |; H! `+ K6 t#504=1.
: M/ v2 z( A% ~- V8 H#1也可放入1011.類似2進制的運算
+ B( |4 U3 Z' N. R* z% M$ C9 S) f
) b% }$ p3 s. N請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

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

羅蓋仙

回复 2# jiangssli
' D) }9 J, w3 g0 o& `. M
樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回复 3# 羅蓋仙


# [0 _( M3 w$ S3 v6 ?6 U/ T    哈哈.............要是你能让系统可以判断大于9位数的才是真的厉害啊...

1426437527

谢谢你分享的宏程式

VYF0412

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