|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 ) o% J* j9 o, t+ Y/ q. Z
程式例：' G; v7 Y! }8 L
#1=1234.(將被分離的數據). F) k, L4 Q; J. g: q* x! w
#1=ABS[FIX[#1]]
. G8 e0 L0 g) l% M6 q/ S) |0 b& Y#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)! }+ K" \2 \4 T
#3=501.(儲存到#501以上)$ K. }+ N, e7 N( v: r* z I$ b* ~/ ?
#10=10.(十的乘冪)& F: E! _! |; Q
WHILE[#2GT0.]DO1
/ W- v; {7 e. F2 |% F#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]! K# l$ N; R {* n7 I
#3=#3+1.
4 }( X; a/ H. u% ~#2=#2-1.
! x8 x- c0 i, t' K/ t#10=#10*10.(百-->千-->萬一直放大十倍)
+ U1 N/ I% L1 F% AEND1
/ x2 }* a; B- H* z3 d; Y) q& i& ~M04 V- O! E. {, e- F* Y: C) o
* P V' X+ k0 O結果：
. Q5 ?9 t& v4 p+ l1 x#501=4.
0 w0 e) U4 |! i5 |; E#502=3.
; N$ y# N) W& ]* y, W#503=2.
% i- S' k' M2 `1 }1 y#504=1.5 h3 S$ e9 _- h7 R& H o! q, d
#1也可放入1011.類似2進制的運算# q( r. E, z2 ^9 O2 r
G1 }! Q7 p/ `' [! M3 s
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思