|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 s& v6 u" Z3 H0 z G- W2 y U [
程式例：
2 W8 e) D& f8 m% g. a6 x, K#1=1234.(將被分離的數據)
- V* r+ D5 `& |, ?#1=ABS[FIX[#1]]
" Q: p7 o! P, C" W0 P6 P#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
2 P6 q1 ~: @0 X1 J#3=501.(儲存到#501以上)$ w7 n0 @* X3 q6 p. c5 x5 t& ?1 {2 g
#10=10.(十的乘冪)* R) J9 K0 Y, }/ [
WHILE[#2GT0.]DO1
+ @1 r, K% n3 w. h#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
2 g0 Z+ W" @" d% K- O2 t$ V1 Y/ g#3=#3+1.
) U/ P# W6 P J/ b7 f, ~ w8 p( |#2=#2-1.2 G8 Z4 i* g9 S: G
#10=#10*10.(百-->千-->萬一直放大十倍)
& H o% r, z3 a' P- ]END1# S, b3 z; R0 D( ^
M05 w6 |0 C9 H/ W9 p5 r, |$ f
1 O# \; Q$ m# _! A9 G, q+ t0 m
結果：
8 d+ g# [& Q4 [+ _# p#501=4.
# \; I E# d; R% c l# {$ p% f#502=3.$ ^ f- l: n! J% a/ L a8 K! }0 z4 s
#503=2.
. ^/ n+ V& |3 d2 ^- `6 z4 c+ ^#504=1.; G" M* f1 F( p$ n" \
#1也可放入1011.類似2進制的運算
" e" g) y& z* I5 H; V. _8 m1 H6 ^' z
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思