|
|
馬上注冊,結(jié)交更多好友,享用更多功能,讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看,沒有賬號?立即注冊
×
分離數(shù)值,6位數(shù)8位數(shù)不必?zé)懒?,我?guī)湍銓懞昧?img src="static/image/smiley/default/biggrin.gif" smilieid="3" border="0" alt="" /> 6 K4 Y5 C9 J7 i5 ?; D! q
程式例:) c! _1 J! O/ S" B/ H3 y
#1=1234.(將被分離的數(shù)據(jù))
0 S2 Q5 g* \: M#1=ABS[FIX[#1]]/ N; W* Z4 \, G8 P' n
#2=4.(幾位數(shù),沒有大於4位用這招不劃算,一定要帶千元)0 N" J9 y [* \5 v$ e
#3=501.(儲存到#501以上)2 F' @- D, @8 Q1 z: y$ G
#10=10.(十的乘冪)
; c9 b \( ]' y8 FWHILE[#2GT0.]DO17 x) N3 p/ ^: q4 D
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
+ Z2 [ |* O9 r( T, y- w F#3=#3+1.
- x5 z& y8 D/ @# k#2=#2-1.: [/ a) ^. k. q) E8 N' ^& ~
#10=#10*10.(百-->千-->萬一直放大十倍)
/ }1 C* n) t; z9 { a$ H) r6 _END1
9 b8 ?; L( F3 A# R; v6 g; x+ ^M0 `% V$ m# L7 T) B
6 x$ y/ Y9 |" a/ e9 h, f* V結(jié)果:
1 |8 ]- e" U( j3 b/ y#501=4.3 \/ z0 D, D2 I
#502=3.* a( R- [% n7 s9 s& o+ L3 U
#503=2.
" j. V1 K3 L5 y3 Q* L#504=1.
# O/ Z0 h9 W6 p/ U6 e#1也可放入1011.類似2進(jìn)制的運算
/ v, H) _$ W0 A4 y1 a* Q2 `: y! Z+ v$ g% D( o0 {
請問你有其他更佳的寫法嗎?請?zhí)岢鰜碇x謝 |
|