|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
, R$ l- L% D/ ~+ I" D程式例：" c5 {0 }/ m' V* o3 K+ c6 _4 o
#1=1234.(將被分離的數據)7 K& x4 Q* M$ |, l" P7 l/ G
#1=ABS[FIX[#1]]
/ t" ~9 F: k& v8 _% ~& l0 T9 R#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
. `9 U ~& z1 l3 a, c7 J+ g% y* L. W- ~#3=501.(儲存到#501以上)# g6 k: x, N# h' _
#10=10.(十的乘冪)+ N/ z: [7 b5 ]$ C1 t; X; k' }
WHILE[#2GT0.]DO1' O( ~2 U8 r) S) c
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]" A% I) A; I: M: @1 c; Y( A5 v1 }8 E
#3=#3+1.3 Q+ F9 b1 ?) e: t( K" e8 D4 F
#2=#2-1.
- F+ B% {5 F3 Z: l8 R* \, E. k#10=#10*10.(百-->千-->萬一直放大十倍)1 I6 H: h9 L# K+ S+ e' Z M* w
END19 Q; R: k* b5 d0 E. ^
M0
$ w1 C( i2 _2 E
7 Z: J. j- s6 t S2 g, B7 ]& R結果：' _+ W; a" H1 v7 p
#501=4.
* }4 r N1 E; `5 X#502=3.
" X6 v, F. B. V' R4 @#503=2.
" z) h; v2 x! d; D6 c" J {" W& K#504=1.
4 f7 W9 V, ]1 c#1也可放入1011.類似2進制的運算- F7 X7 K2 @" w% m" L" ~5 N: l
& L; {& _, i# y, l' A I
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思