|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
分離數值,6位數8位數不必煩惱了,我幫你寫好了
6 Y$ Y1 s: c& @4 y程式例:
6 l" w! X" K# X/ l5 c- d1 O#1=1234.(將被分離的數據)
& Z- U$ a+ E, w#1=ABS[FIX[#1]]7 a. l# A, V+ b( ~
#2=4.(幾位數,沒有大於4位用這招不划算,一定要帶千元)- L/ b$ C: v+ `+ b0 S0 q4 |, n
#3=501.(儲存到#501以上)
; r* c9 I4 g7 i' V4 V1 _+ `7 o4 f0 L#10=10.(十的乘冪)
; X3 e" H. b+ a8 Y: Y1 ]WHILE[#2GT0.]DO1
4 y3 W9 i2 }4 c) r#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]1 i; U# p2 w. I: L4 S. |
#3=#3+1.) s+ j* j; F- l+ T( W9 p9 K, Z
#2=#2-1.4 h4 L O; V! ]5 @
#10=#10*10.(百-->千-->萬一直放大十倍)
) g0 T- Z( }6 sEND1
4 l9 B% i G; o V' A2 xM0
' g$ P7 n. t; f- {, v
) H, F2 U1 S. m: l' Z結果:
3 Z, K# t# ~& }4 o# ]#501=4.
8 w/ g% N: m6 s6 w/ I+ n#502=3.. f& g% h5 i2 q6 ^2 X% ?; Y1 G+ Z
#503=2.! g! n# p4 J7 `- v7 R6 c7 T' ]
#504=1.5 t# l: D* k1 N2 E& A+ D
#1也可放入1011.類似2進制的運算
^4 N: Z6 J2 }6 X& g5 p% J( Q1 D+ M& ~
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|