|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
分離數值,6位數8位數不必煩惱了,我幫你寫好了 $ c7 q# @9 g. z3 T" X' Y
程式例:
& O0 p; v; @0 l& W! {7 w8 m- t( j#1=1234.(將被分離的數據): g% g2 t) |9 j1 [
#1=ABS[FIX[#1]]
1 e. S& U5 ~- p( _+ I#2=4.(幾位數,沒有大於4位用這招不划算,一定要帶千元)
5 w( a8 ]5 a" @$ d/ q7 ?#3=501.(儲存到#501以上)
5 y7 y" Z- I0 N# t% x#10=10.(十的乘冪)+ | s4 V$ y+ g7 Z
WHILE[#2GT0.]DO1
9 T' x3 s, {& h#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
/ Y* e* t' U' ~: Q#3=#3+1./ W6 m" K- q T: i2 S0 }
#2=#2-1.- x1 U# A! ^- X4 I7 L; }3 c$ Z
#10=#10*10.(百-->千-->萬一直放大十倍)
! x! F' A# m1 c6 I$ HEND1( n) h* K/ G1 n) B' _
M0" J( v' V* o7 l6 m" t* R q$ S
, p+ E+ B4 x& K2 Q結果:
+ x8 f5 P" d6 O, Z7 x( s7 x, m9 c#501=4. B* G) v& b! F4 h
#502=3.
9 Q' z( h: U& i* i r7 w#503=2.- {* Q- z. N7 L* W
#504=1.( G# A# r6 {& ?9 P' m
#1也可放入1011.類似2進制的運算
: J+ h# T% i/ u& f
) S! S$ z% \5 p3 {5 |: r0 O* i請問你有其他更佳的寫法嗎?請提出來謝謝 |
|