|
|
馬上注冊,結(jié)交更多好友,享用更多功能,讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看,沒有賬號?立即注冊
×
分離數(shù)值,6位數(shù)8位數(shù)不必煩惱了,我?guī)湍銓懞昧?img src="static/image/smiley/default/biggrin.gif" smilieid="3" border="0" alt="" />
+ i2 {; D2 C2 k) Z' a程式例:1 J+ A) ^4 Y+ [* `( Q3 }
#1=1234.(將被分離的數(shù)據(jù))
- `' ?' j' J/ g9 ^% ~5 O% k#1=ABS[FIX[#1]]: `6 O, ]1 a. E$ S* {0 C# O
#2=4.(幾位數(shù),沒有大於4位用這招不劃算,一定要帶千元)
4 }' V9 X6 p u3 y. G& ~# W0 A#3=501.(儲存到#501以上)
' y! k8 V: q3 k8 R9 V1 ^9 v#10=10.(十的乘冪)/ g) S% D8 H+ O1 [7 c% @& G
WHILE[#2GT0.]DO1
( u4 P/ Y" W U2 e1 [#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]1 t. K) C2 f# k Q% V
#3=#3+1.
P2 \; n. G- g0 l# [& I$ ]/ d#2=#2-1.5 `( \. e; w* g% m- ^: T
#10=#10*10.(百-->千-->萬一直放大十倍)' n8 V i! w; Q# d
END1! d9 J2 V- t( Q
M0' b! A- @( c, H: w
6 v/ Z z4 ?6 ]+ i1 h2 c結(jié)果:
7 n9 u# C% c3 n. B: n. R* [#501=4.
; @4 D) |6 T; T) s#502=3.
4 X/ B) G; ]$ O+ _0 L#503=2.& y% P- u! J- {3 W( `$ V! k
#504=1.
8 B7 I% k0 ~/ F# b2 }#1也可放入1011.類似2進制的運算: O" {; v# d" d# o) L/ J m* ~ F& ?
2 s5 O3 \$ u" c' I請問你有其他更佳的寫法嗎?請?zhí)岢鰜碇x謝 |
|