找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 2324|回复: 5

[分享] 分離數值,6位數8位數,如何分解???

[复制链接]

28

主题

67

回帖

146

积分

注册会员

积分
146
发表于 2013-2-8 22:21:31 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区

您需要 登录 才可以下载或查看,没有账号?立即注册

×
分離數值,6位數8位數不必煩惱了,我幫你寫好了 ' A: g6 V2 B9 s& F8 m6 |, g9 W% W% v9 d
程式例:
- \( D* F/ s# X& S9 x( `' n#1=1234.(將被分離的數據)1 m2 M! A! Z5 O% e& x5 T; ?2 e
#1=ABS[FIX[#1]]
8 q5 o& I# u- s#2=4.(幾位數,沒有大於4位用這招不划算,一定要帶千元)6 N- N, C1 E6 b1 g' ?
#3=501.(儲存到#501以上)
/ b% M7 I) D8 W' j0 O#10=10.(十的乘冪)
4 O, o, X; m3 I6 u  {1 e6 oWHILE[#2GT0.]DO1# c7 Z+ h' `& o1 @
#[#3]=FIX[[[[#1/#10]-FIX[#1/#10]]*#10]]
% e# t" g4 Y% `5 q7 S#3=#3+1.
, P0 j1 _. S3 z9 c#2=#2-1.
/ f/ ]  p& }6 Q1 F  M4 x* G/ Z( P#10=#10*10.(百-->千-->萬一直放大十倍)& b; V& w# K; ?5 ?6 V3 F
END1( ?# z2 @' l1 E. c; {
M0' K) l5 r4 S+ L5 s* s3 z$ p

# N  W1 x- R9 |/ `' ^結果:$ S9 H% {/ Y8 O- M  j
#501=4.( t7 V1 e; p, o" j. M, K9 v
#502=3./ L( r0 t0 Q4 ~4 U
#503=2./ g  q) F1 k! V0 E& h1 o
#504=1.
) R$ y( F, c1 y- p' d: G& h#1也可放入1011.類似2進制的運算4 D. T8 {, `$ t
4 \8 x4 _1 \" Z) z& r$ w9 M" f0 o
請問你有其他更佳的寫法嗎?請提出來謝謝

1

主题

123

回帖

923

积分

高级会员

积分
923
QQ
发表于 2013-2-25 14:14:09 | 显示全部楼层
楼主试试 大于9位数的分解........这个更有意思
万能的主啊!! 请您一定保佑看帖不回帖的人的天天尿床!!!阿门!
回复

使用道具 举报

28

主题

67

回帖

146

积分

注册会员

积分
146
 楼主| 发表于 2013-2-26 20:12:39 | 显示全部楼层
回复 2# jiangssli 8 w/ ~, J7 x6 W1 r" ^
( D4 z+ c- {* A7 p# h
樓上的帥哥我怎麼沒想到,9位數是會破表的
回复

使用道具 举报

1

主题

123

回帖

923

积分

高级会员

积分
923
QQ
发表于 2013-3-5 15:21:57 | 显示全部楼层
回复 3# 羅蓋仙
& c& {3 k, m: d; m3 M% x; _2 b
* c7 T$ a; \1 t$ m0 j2 n8 `4 z9 Q: o: M2 [9 |  I: x
    哈哈.............要是你能让系统可以判断大于9位数的才是真的厉害啊...
回复

使用道具 举报

2

主题

771

回帖

786

积分

高级会员

积分
786
发表于 2021-9-4 17:49:28 | 显示全部楼层
谢谢你分享的宏程式
回复

使用道具 举报

1

主题

41

回帖

49

积分

注册会员

积分
49
发表于 2022-1-11 14:41:01 | 显示全部楼层
感谢贴主分享经验感谢贴主无私分享宝贵知识,但是它具体用在什么地方
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

QQ|Archiver|手机版|小黑屋|若枫后处理论坛 ( 苏ICP备11015087号-1|苏公网安备32059002001368号 )

GMT+8, 2026-1-19 19:41 , Processed in 2.253381 second(s), 25 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表