|
馬上注冊,結(jié)交更多好友,享用更多功能,讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看,沒有賬號?立即注冊
×
分離數(shù)值,6位數(shù)8位數(shù)不必?zé)懒?,我?guī)湍銓懞昧?img src="static/image/smiley/default/biggrin.gif" smilieid="3" border="0" alt="" />
+ r& m7 n2 L, T程式例:
8 `! \) p4 R! Z, X2 L6 z#1=1234.(將被分離的數(shù)據(jù))5 {6 \ A2 C v$ }" O0 c4 Z
#1=ABS[FIX[#1]]
5 d: e, a/ m7 x! J; e+ \#2=4.(幾位數(shù),沒有大於4位用這招不劃算,一定要帶千元)
' X4 V& {: g* X, h9 O; X' g$ D1 m# Q#3=501.(儲存到#501以上)* X, o" E; h( C/ m1 K
#10=10.(十的乘冪)
7 U$ |( x6 d* u, X4 Q% NWHILE[#2GT0.]DO1! i0 s" X% ]# n7 C
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]! p0 k3 Y! d2 k( v( |5 U# |
#3=#3+1.) S7 W, p& Y, z/ t, N5 Y9 @9 a
#2=#2-1.
! I' A6 Y2 x# L( r! n4 q8 D, ~#10=#10*10.(百-->千-->萬一直放大十倍)
# J8 e2 M' v. L3 x8 \+ K1 R* c- qEND15 K8 I) b0 z4 ?9 O* x' r; V) A
M0
1 P* u" ?; b0 q
) ~8 Z3 `( X2 F! \7 a X: r! |' g結(jié)果:; R4 J' f) |, k) Q' J w
#501=4.
& D, Y4 I& ]# L" ? s- u, K8 f' h/ m#502=3.* q# X/ ~1 D ^* }5 R) u; r. F( b
#503=2. b- a1 W, L3 }
#504=1.- M e2 o' ?/ v, ?; v/ x5 S: n
#1也可放入1011.類似2進(jìn)制的運(yùn)算7 U. Z# R( Y# C2 G2 @& y+ y0 c
6 B, [4 e1 _/ l9 ^2 y請問你有其他更佳的寫法嗎?請?zhí)岢鰜碇x謝 |
|