|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
; @' J, w" a1 j, l; c& a6 i程式例：
5 Y6 n' { g! \# \#1=1234.(將被分離的數據)
, t" b# M' i' q#1=ABS[FIX[#1]]6 _8 b7 P7 f5 O0 U( X
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)6 }5 n% k6 W( Z2 }
#3=501.(儲存到#501以上)* L m; k7 {. N* M; L( ~# W" X
#10=10.(十的乘冪)1 T3 | r' t) U& D
WHILE[#2GT0.]DO1
5 a, j; ?; |' L0 [+ R" q#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]5 Y% [* M6 O6 s/ i+ Q/ A
#3=#3+1.
: v' ^( n& i5 q5 B8 F/ x! O#2=#2-1.
% X% y+ I8 U1 V4 m+ I9 l9 a- Q8 D#10=#10*10.(百-->千-->萬一直放大十倍)& s/ ]% J6 [; n& x, M% R+ s; A7 E; J7 ?
END1
. _% H' S, C$ s C$ xM0
/ A3 H7 D6 n8 M3 n' W G: g! O( K) R4 `
結果：* v# v1 C% P, _& o
#501=4.3 |0 w: C4 v1 C& c: B! y; R0 @4 q
#502=3.
/ o+ S! u/ ^ E9 b4 P0 d' l* ^3 j#503=2.0 h" K9 u) `8 v) j$ a6 u$ t
#504=1.
9 h- ~6 K, U. s7 z8 r, ~#1也可放入1011.類似2進制的運算
5 v( F3 i' i3 x! L4 ~. l/ k, u2 ~, t4 t1 c$ O$ S/ c3 ~
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思