|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
分離數值,6位數8位數不必煩惱了,我幫你寫好了
4 s# C8 V, }; o7 v' f: e程式例:
& r; [3 Q* i% F7 u" p8 q#1=1234.(將被分離的數據)
# n. W+ f' X3 Y: Q. G7 B' q+ F$ M#1=ABS[FIX[#1]]7 v6 N+ f, x4 E6 h* e
#2=4.(幾位數,沒有大於4位用這招不划算,一定要帶千元)
! F; ]' s6 c( g& f. j6 N' {#3=501.(儲存到#501以上)0 _9 }* `! f8 X3 }
#10=10.(十的乘冪)
" f" i) Q$ T" C( Q1 b. ?WHILE[#2GT0.]DO1
! a( G1 x# U3 `2 k( a" z2 o' q#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]2 u+ K/ W: D& b* H/ w& @
#3=#3+1.7 P3 w4 I3 a( B! i
#2=#2-1.. z% [% B/ \: A# \5 r! y# C
#10=#10*10.(百-->千-->萬一直放大十倍)
0 a: k; a& F; JEND15 K8 Y1 |7 k7 t
M0
5 e6 s% T( ]5 s; h4 w0 M
+ }% t9 ]% H* \" \4 w結果:
7 |! ]1 q. g5 R: @, ~#501=4.6 c1 v& O1 e, H+ X: T8 [' T @
#502=3.
1 S& B% Z, Q( W+ z! t0 |; C! X$ @2 u#503=2.2 s5 O5 U- g% L% ?- p/ U6 F( R- U
#504=1.9 a8 Y+ H) Y2 m/ P- L
#1也可放入1011.類似2進制的運算3 o% R1 w/ c3 V# |
; I9 K, C! d# H# A- ]& g& ^
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|