|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
% B t" c7 G: m& U6 r0 F; B0 q程式例：
, V+ U+ U, @9 T y#1=1234.(將被分離的數據)
" N# @) ^" N. S3 y( P#1=ABS[FIX[#1]]5 g- V& a$ h( r: U! V5 Y/ y0 ~
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
+ A0 H- q8 a& K3 f" l$ ^3 b3 D5 [8 L#3=501.(儲存到#501以上)8 c$ N; A6 F+ ^4 T6 f: {+ g
#10=10.(十的乘冪)2 P" l' `. _: k+ r1 M
WHILE[#2GT0.]DO1) }3 i9 t8 {8 F/ s+ h' O; ]1 m
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
: w- f# f: Y0 _# W8 c. ~; S9 C- F#3=#3+1.3 b( v1 R1 O& c9 S2 G% z0 k
#2=#2-1.( Y3 h* i+ [3 y
#10=#10*10.(百-->千-->萬一直放大十倍)
0 E: O$ [: P* j: D# e3 NEND1+ ?5 K9 A# z- v3 W
M0
% w- f, ~# ~0 o8 v. C; I1 c( ` Q: C8 \; s: x3 c/ U0 D0 z
結果：
$ j: J% x+ ~; ?2 C& P. u#501=4.
/ d1 b! T7 K0 C9 \- y#502=3.
, M& R8 e! `2 V) N* ^7 i2 ^( T) d( T+ s#503=2.
9 z3 h7 T; G6 a2 g) s# E#504=1.
. c3 q5 F0 ~0 r7 e' h e#1也可放入1011.類似2進制的運算 G v8 ~4 z3 H' j6 W
' t6 m6 _+ A/ p R! v7 }: K請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思