|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
1 t; K; h* k/ q3 X0 y程式例：
* G! m8 A7 Z' [2 u8 C- o#1=1234.(將被分離的數據)
$ G1 u' J) S& H* G5 I, d( T9 e#1=ABS[FIX[#1]]
' c* ^" y0 ]- B6 _#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
( G8 l6 I% m. s- s#3=501.(儲存到#501以上)
$ w' s6 ~; b6 ~4 w#10=10.(十的乘冪)6 L, Y6 b) a s2 a2 w8 i
WHILE[#2GT0.]DO1! t6 }& R, s. K' c6 u
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]5 A& ]! W. X, d2 Q
#3=#3+1.
& [9 j8 O/ x! G. i$ L#2=#2-1.& r c7 `, g# X
#10=#10*10.(百-->千-->萬一直放大十倍)
7 m; t: Y; K( g i( XEND1+ L9 [' O3 y1 V/ Z7 \
M0% m5 \% t, S: g4 h: v; P1 _7 l/ w* O
7 A/ c# Y( n$ x( k4 f3 s
結果：! U( u8 ~' Y1 w" U' ] f# B! l0 [* M
#501=4.# q$ r) U4 o7 v5 G0 @, G" v- Y
#502=3.- m/ m" Q3 b: D# j; E2 e
#503=2.
% G0 m4 {# W I, w* {7 n3 q0 ^#504=1.
: F$ ~% `2 m; u7 \#1也可放入1011.類似2進制的運算
% d1 k& D4 C$ q$ G
9 C( F+ K0 C/ ^請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思