|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
" W3 A# f8 n! [8 S7 v; X. `程式例：
' m9 Z- d. m* \$ ^, o$ ~#1=1234.(將被分離的數據)* [( p5 U% u; R0 W( g) {
#1=ABS[FIX[#1]]" M# J! H. o# f: K6 f
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
7 P1 E: x8 M0 \) x6 B; c#3=501.(儲存到#501以上)) d" m e2 _* X2 ?; A
#10=10.(十的乘冪)4 h, _" }5 v* i* b
WHILE[#2GT0.]DO1
+ l* v) U; h& `1 Y$ U( _) W#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
. C6 E4 P% m) a' q#3=#3+1.
{3 y" r% I' j0 p! Z$ f* M" }2 `# l#2=#2-1.
3 D* v( d# d( U3 R5 [% N( ?#10=#10*10.(百-->千-->萬一直放大十倍); T" q3 g6 T0 e* T9 C- k3 M
END1
5 c1 A( g: _% D% x% RM0+ X7 ]4 V( Y8 D4 X- f2 g6 a
0 I8 ~& b9 H- V# n# o結果：9 I6 }9 ~: E) H
#501=4.
; @5 w8 ]8 g% x#502=3.3 g% I1 | r9 \+ c2 p
#503=2.9 i4 n8 B/ a% X( L* g2 |
#504=1.
) S/ ]- p8 Q8 \" f, i#1也可放入1011.類似2進制的運算
3 A: [" U9 _. y0 n
8 }' Z9 n J! W8 X6 K6 G8 d請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思