|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 7 [5 b+ u' O, o/ P
程式例：
& J+ P) B9 T2 s3 ~, {1 q7 J#1=1234.(將被分離的數據)
* B: j: e; T5 _5 p7 J. f#1=ABS[FIX[#1]]
4 {+ S6 o* @% |6 v#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元); V5 `2 p2 e+ l0 m& n+ L$ ?" z; S, x
#3=501.(儲存到#501以上)& Q# {/ q5 v8 m& J& a$ X2 V; W
#10=10.(十的乘冪)
C) C4 _. R: k: y, g [WHILE[#2GT0.]DO1, }3 x/ A" L: X( m
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
J: _, u2 B3 u5 T! [#3=#3+1.
, n- R- ~; Z! V1 w#2=#2-1.: \! S/ u. v% a+ ?" ?
#10=#10*10.(百-->千-->萬一直放大十倍)
, W9 G3 G7 G+ JEND1$ o* e: \3 K$ }0 B
M0
- K; X" Z0 k" ^# b) }) r! m. d/ I; C( _8 d- [3 @. y
結果：
! r9 _4 B, d; o9 l' z#501=4.
: z5 Z/ Z: m2 H2 m i& K- R#502=3.
% u1 z1 n' v' h& q! F#503=2.8 u' s% ]3 Y# m9 i
#504=1.
: n- F' c% x4 h, M. \4 \& L1 q5 ]#1也可放入1011.類似2進制的運算& ~. d& q0 J' ^/ I
8 s+ P5 |$ H7 N. a1 T1 g請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思