|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 2 [, ^# K( c0 q- f8 m; F4 z2 j
程式例：( o8 m3 R: K9 v% P" x! B7 r
#1=1234.(將被分離的數據)
0 c% O A+ \# Z, S1 _$ X: j' U#1=ABS[FIX[#1]]
: A# k% U% K0 Y#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)5 t5 R K8 k1 A4 f+ M
#3=501.(儲存到#501以上)8 o9 y0 A/ G; U9 F; s; d- N+ }) G
#10=10.(十的乘冪)
@& `$ I; D* \# h$ ~: y5 r& `) RWHILE[#2GT0.]DO1; M7 j# J( L9 R, o! k0 a
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
- i- K( ^( v ]0 S: D8 @! o/ Y7 g" ?: H#3=#3+1.
( _- b; w8 a3 K* \4 a#2=#2-1.
9 o: ^$ {( A" W/ I3 g# t Y7 z#10=#10*10.(百-->千-->萬一直放大十倍)
% }, R; j5 r; |$ aEND1* P2 ~* P$ x4 {4 r+ j
M0
2 m. q7 }9 x( i6 a B% {
. ~. S2 J5 D$ J, a3 K; U7 i" z結果：9 z- ~, d8 q. {3 |+ Q1 Q+ I9 f! X
#501=4.
- e8 _4 ? A9 ~; o#502=3./ D( h& Q" O" l
#503=2.' c1 i4 }. y6 R$ o; `
#504=1.0 u: K8 w7 M( Q: d* X3 c* ~
#1也可放入1011.類似2進制的運算# v& @ }! d6 H2 r1 r
7 r, C0 `& K$ N& S+ R請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思