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

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
程式例：
#1=1234.(將被分離的數據)
#1=ABS[FIX[#1]]
8 B. J/ F1 O" A$ M#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
#3=501.(儲存到#501以上)
2 t' Y) k% X( A; i#10=10.(十的乘冪)
) x1 [  r, D2 G' G- x, ]5 R+ }WHILE[#2GT0.]DO1
* _/ Y  u: V9 h#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
9 r# b$ l+ [0 P; H#3=#3+1.
#2=#2-1.
#10=#10*10.(百-->千-->萬一直放大十倍)
! n3 a1 c/ J3 Y, ]0 _END1
0 [, ]7 [( s- N- U; G7 qM0

結果：
#501=4.
! d) q5 _! p6 o& I. ]) B3 h8 n#502=3.
#503=2.
, T, s% y* ~: ^4 j: F) V0 H) f#504=1.
#1也可放入1011.類似2進制的運算
" |7 h0 K/ C( o+ Y: }8 Z
請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

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

羅蓋仙

回复 2# jiangssli

; M) I6 V! d4 t% m8 ^! q- a樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回复 3# 羅蓋仙

  o" R$ b& d7 Z  u
- N3 c: ]3 t. [2 h9 I# T# H    哈哈.............要是你能让系统可以判断大于9位数的才是真的厉害啊...

1426437527

谢谢你分享的宏程式

VYF0412

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