|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
8 ? g5 m) ^( w2 h! b! F) S程式例：5 }4 p# s( u/ K- g+ b
#1=1234.(將被分離的數據)
0 a5 _! E8 f% D W#1=ABS[FIX[#1]], u1 U8 i3 L' u1 |3 [
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元): G1 O2 e+ f4 l9 V8 R0 L9 k: o, ^
#3=501.(儲存到#501以上)
- X: l. D% \9 g3 M. b+ u3 a#10=10.(十的乘冪)$ w, Z# c3 H4 K1 s8 a- H9 }" Q
WHILE[#2GT0.]DO1
$ p# v: R7 E k( W5 V#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]; E, j, x A! j2 s& ]2 O; D% l
#3=#3+1.0 X0 l" T _% e, W
#2=#2-1.% M# C* i+ j2 Z; Q
#10=#10*10.(百-->千-->萬一直放大十倍)& u$ [- H; K0 w* p/ C
END1
9 P8 k, S( D5 G% T3 `" xM0
0 c0 I) \' W0 \: F, \* z) O, e! }' y; F- O( R3 g
結果：7 i; v1 B* ], N0 k# U
#501=4.
6 U- `+ G1 U2 f( g#502=3.
1 T2 F1 D! C: N6 C( v+ h9 x#503=2.+ V" z/ H* z+ G9 D& s
#504=1.
5 k' m( f& }% n ] X# X#1也可放入1011.類似2進制的運算 L+ k& ~3 S# O1 y- ]+ G
/ z* W" s K3 s# d1 \請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思