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

羅蓋仙

分離數值，6位數8位數不必煩惱了，我幫你寫好了
4 H6 H# L/ L. o/ k, g9 O" b0 P6 j程式例：
$ g0 f% X  V6 K+ ?#1=1234.(將被分離的數據)
' m$ C; O- _; _! B; k$ W. x/ I) }#1=ABS[FIX[#1]]
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
+ g- J& o& ~7 ?; N8 M1 S  a4 E#3=501.(儲存到#501以上)
8 E0 \( }% b2 z) J: V5 k& }9 O#10=10.(十的乘冪)
WHILE[#2GT0.]DO1
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
& {& N- S# b6 A, i#3=#3+1.
#2=#2-1.
* }6 z: g# s7 u% G# E6 |#10=#10*10.(百-->千-->萬一直放大十倍)
' [$ L, U1 Q1 {/ p+ i, c; EEND1
8 `+ c! ?% w# A( m/ J. lM0
1 H2 q! h" n4 K5 M: U: h: [1 W. }
結果：
  y2 N; }( X" I9 k4 M; Q#501=4.
! H/ r3 Z5 Z6 @, c9 Q#502=3.
#503=2.
#504=1.
% J1 H, v; P. C6 a; L2 e#1也可放入1011.類似2進制的運算

請問你有其他更佳的寫法嗎?請提出來謝謝

jiangssli

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

羅蓋仙

回复 2# jiangssli

  a$ O2 s/ x. K0 m樓上的帥哥我怎麼沒想到，9位數是會破表的

jiangssli

回复 3# 羅蓋仙

& g- ~6 \- z( n5 ]
" ]9 K2 X! E6 p" [    哈哈.............要是你能让系统可以判断大于9位数的才是真的厉害啊...

1426437527

谢谢你分享的宏程式

VYF0412

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