|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
分離數值，6位數8位數不必煩惱了，我幫你寫好了 , j" h' j; _: W, A. F& s- I
程式例：$ h$ B0 z S+ z
#1=1234.(將被分離的數據)
" b6 w# |8 D/ ~#1=ABS[FIX[#1]]
# H: ]5 U o5 J& w#2=4.(幾位數，沒有大於4位用這招不划算，一定要帶千元)3 M, D o% e# j3 ~& ?" g7 A
#3=501.(儲存到#501以上)
, e5 l: u# T- x4 P#10=10.(十的乘冪); _' l- Y% P) y& c/ X# d
WHILE[#2GT0.]DO15 g9 F4 t5 z, E; |! p6 u2 T
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
4 a9 O& W! d. p0 V$ [+ |0 B#3=#3+1.
7 m' g: P) K2 N# ]1 L#2=#2-1.0 H( v* r' e1 t# s
#10=#10*10.(百-->千-->萬一直放大十倍)& O) \5 u. g7 M! z
END1. K: a! }5 a9 I' p& p/ I
M0
0 A. K' j/ y; Q; Y2 [
7 N/ J4 d5 ^0 m結果：3 F3 i# ^" v) `+ X0 p0 N
#501=4.! a. K; X( L* U
#502=3.4 E5 T& U2 x" g F' c) {6 J
#503=2.
. T& m5 U9 a2 Z/ V#504=1.# g# i& X$ n3 L/ S) N
#1也可放入1011.類似2進制的運算) N& S# B' f" E1 ]
6 C6 [1 Y" k0 w$ [
請問你有其他更佳的寫法嗎?請提出來謝謝 |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-8 22:21:31
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
楼主试试 大于9位数的分解........这个更有意思