|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 ' g4 J0 D9 K' m- h4 {
程式例：
/ [6 l8 t( f: C4 v#1=1234.(將被分離的數據)' H4 R2 J& {3 i- ^5 {2 S8 z
#1=ABS[FIX[#1]]
1 q6 \& S2 Q) C" N! o" Q/ _, I#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)% t& \6 S$ n6 U( [! ^
#3=501.(儲存到#501以上)9 G2 ~) v, E4 F% i7 ^
#10=10.(十的乘冪)
- k: g5 X" ^& KWHILE[#2GT0.]DO1) a" e0 Z. a1 V7 S, H$ [- ^! ~
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]1 Q- P( V6 H) `
#3=#3+1.: i) ^3 u' i$ O2 r2 _
#2=#2-1.
6 U1 e( t0 F( a+ A' q#10=#10*10.(百-->千-->萬一直放大十倍)
/ R+ n# {( @! LEND1( i, n+ {9 {+ z# Q( X
M0
5 N" w& V- E$ I4 Y3 ~. {! n$ x) Q B# i2 r# m( o5 o9 u7 d
結果：( \4 ^6 Z# j: D+ R- R& k" F6 V
#501=4.
- Y2 l s$ }6 L" A. R#502=3.
6 ?: G9 f" e' T! k5 \) ]#503=2.
! @$ h9 K/ }1 f8 c9 g! A#504=1.6 T b# ?! U& ]2 {9 c9 z+ O" J
#1也可放入1011.類似2進制的運算$ u9 b9 w2 i0 G" C+ u$ f
9 [* E% L1 l! j! @請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思