|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 , F/ g1 ?6 t0 N
程式例：( `9 t8 J5 k1 }6 Y
#1=1234.(將被分離的數據)+ ?1 ?* w4 I4 D
#1=ABS[FIX[#1]]% V3 }& q5 [- I8 P8 C& f
#2=4.(幾位數，沒有大於4位用這招不劃算，一定要帶千元)+ {+ X3 n; P8 E, I; L, x
#3=501.(儲存到#501以上)) Q# h- d( c' o" q
#10=10.(十的乘冪)
w0 N, ?/ ~8 R$ i% k8 QWHILE[#2GT0.]DO1
6 U- e* _2 o$ f9 F- E# r y#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]] R6 C: Z# k, Y
#3=#3+1.- s0 H% A M& O5 B' `
#2=#2-1.2 `8 ?4 y" |0 X& W! L5 Z
#10=#10*10.(百-->千-->萬一直放大十倍)
) Z1 T6 d3 y3 ?7 k; `! \9 ?6 zEND1' I8 Q# I! w& h$ {$ T' e
M0
" b9 E. x, v/ A J. R
a" z4 f/ z6 P% p# f( z結果：0 ~# c* q. ?% [0 w+ P+ d6 Y0 N [/ X
#501=4.
' T2 Z' ~- @1 X/ L4 U#502=3.( F D, L! W; U4 w7 ~
#503=2.
% @3 O* L( n V7 j8 ?#504=1." p l8 v/ Q, C W$ ] I
#1也可放入1011.類似2進制的運算
3 \9 ~# A2 `4 V/ W5 g- R, F9 X0 Q u# E" {5 I5 S) [
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2013-2-8 22:21:31
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
樓主試試 大于9位數的分解........這個更有意思