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

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
5 l. K) @9 @! U6 w; W程式例：
  c8 b$ W7 E3 }# {#1=1234.(將被分離的數據)
#1=ABS[FIX[#1]]
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
#3=501.(儲存到#501以上)
#10=10.(十的乘冪)
WHILE[#2GT0.]DO1
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
0 c5 F4 [3 ^' e  s" X4 u#3=#3+1.
#2=#2-1.
2 g, @. h5 j% T1 L#10=#10*10.(百-->千-->萬一直放大十倍)
END1
- ]2 ~% ]  ~# x7 z  A; i$ i, D0 |M0
# Z  V& f# q, u* a6 E* G1 |
8 j4 }* G% ?$ t9 a5 m7 c' p: s/ G8 b2 w結果：
#501=4.
#502=3.
#503=2.
& m) e% K6 A3 N' }0 s7 |#504=1.
3 U: t+ K# q5 e0 T#1也可放入1011.類似2進制的運算
. [, t5 d1 \* R/ [
. a  ?7 \# r1 c+ Z請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

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

羅蓋仙

回复 2# jiangssli
; B: J$ \$ z# O6 m
樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回复 3# 羅蓋仙
% d) C8 m' L7 e9 I1 T- u0 ]3 W

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

1426437527

谢谢你分享的宏程式

VYF0412

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