|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
+ V2 ?' q7 r6 T3 t" H4 c4 \ }" h程式例：7 E8 _/ [" g9 m9 B
#1=1234.(將被分離的數據)
! \7 G n$ P% t* k9 T+ t$ `) ?#1=ABS[FIX[#1]]
6 s- J5 ]$ d0 c+ A) x7 l4 p9 A s#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
: U4 ~4 l# x+ A C# I8 Y% s#3=501.(儲存到#501以上)
0 z: }9 l, \$ S C#10=10.(十的乘冪)
( C" F0 S' u" x" WWHILE[#2GT0.]DO1% H" ~) Y. h. O! B% H3 u' u/ }
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
3 E( t* ~* t1 X3 [+ t c( Y#3=#3+1.- U. Y. s* A5 W
#2=#2-1.1 C4 y4 r9 R {
#10=#10*10.(百-->千-->萬一直放大十倍)! v4 }! V2 Y" m$ m
END11 R' W( |5 {4 w& C1 @1 Z
M0# p1 {5 d1 Y K
; g( q1 {5 \) k2 J/ a9 R
結果：
" a e3 T1 O7 N% l5 b; y#501=4.
) x# H. G3 A( u/ H& o#502=3.
e4 Y; n. q, h+ P: z- W3 e#503=2.1 R; p3 I4 O/ e8 V* e/ B
#504=1.
5 n/ [2 s' B* Y+ R#1也可放入1011.類似2進制的運算
1 ]9 b: b& e4 C) _4 Y& a' Q8 z( x$ q" s1 p# c
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思