|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了
3 ?/ Y0 r' w! l; q' g程式例：8 u$ c% Q; v @) `5 S$ V& T
#1=1234.(將被分離的數據); V! g- m' R# }. s1 r, K% o; \
#1=ABS[FIX[#1]]' Z5 s" X- b; [+ ?8 Z
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
6 E6 y7 d- f! K; @1 r6 |' S& o#3=501.(儲存到#501以上)- Q! f/ j' ? h+ _9 k i4 B. B
#10=10.(十的乘冪)
3 ~( u# s+ I4 t' `, P8 aWHILE[#2GT0.]DO1) _2 f- O T: t; t. _* w
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
* [2 q' t. E8 P#3=#3+1.* B8 T, _: {+ ?+ L( _3 g/ c6 x
#2=#2-1.
( }/ B/ ^0 M7 a$ \# ~#10=#10*10.(百-->千-->萬一直放大十倍)
" N0 q4 K( ~/ YEND1) n! S v% _0 W( g+ k
M0; u) i6 w8 m' @$ G
! e8 S3 n, {" |- @
結果：
% a; d3 z% i; `) R" M4 ^- A#501=4.* W5 ?5 k, W' g, B. q
#502=3.
+ z& m* f0 o5 U6 U4 q#503=2.
" U6 h7 u* N9 C#504=1.
+ Z+ s6 K- O4 g* b' D' v#1也可放入1011.類似2進制的運算1 ?3 r5 r7 m* {) _9 ~; C
, q4 ?, U) e8 T6 ^
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思