|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 - v, N `+ I' C6 z' `
程式例：
: y' }4 V1 m; Q6 j5 ?$ {$ I#1=1234.(將被分離的數據)
+ j0 `9 y' X; x6 F$ p3 Y) _3 U#1=ABS[FIX[#1]]1 V& v, n5 |' d5 R y2 i2 e3 j
#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)
7 p/ ?) O ^1 }3 b#3=501.(儲存到#501以上)8 Q& _$ l- F. ]& {. e: X2 O
#10=10.(十的乘冪)5 A7 @/ ^ G6 i0 u8 c) f
WHILE[#2GT0.]DO1" U8 a# z; Y0 W( t- w6 K, Y5 [- N
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]0 j! \" Q: ?9 I- K Z
#3=#3+1.! o0 @& ?% ]$ G' m& l! d
#2=#2-1.4 i/ Y! o7 L8 u. Q1 I2 G9 i) Y
#10=#10*10.(百-->千-->萬一直放大十倍). T: V5 B X# R1 z! y( @8 V4 X
END1" h/ ^. C5 Q; [: r/ T/ G: g5 L
M00 \# U( _; C6 L$ r! G! |' w. l0 G
; @, P1 D6 }: }) [) q! f
結果：
5 h- X' ] j/ ^) H6 d8 u$ ?#501=4.$ r5 F6 X$ B! x. n/ U* m3 z
#502=3.
- ` h/ C- C+ B* w! m#503=2.
5 K9 s5 f2 o8 G# c) t/ }#504=1.* E$ d( d8 y# r( \% m
#1也可放入1011.類似2進制的運算$ ~1 p" [. k. G1 i$ m$ E
2 B5 D2 C2 g1 `請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思