24小时热门版块排行榜    

CyRhmU.jpeg
南方科技大学公共卫生及应急管理学院2025级博士研究生招生报考通知
查看: 748  |  回复: 11
当前主题已经存档。

zzhhmc

木虫 (正式写手)

[交流] 【求助】请教!三个数之间的误差表达方法

假如有三个变量q1,q2,q3(注意是变量,并不知道三个数的大小),当三个数之间的误差都小于5%时,则q=q1+q2+q3。否则退出程序。请问大家这段小程序应该怎么写?最好VB语言。谢谢了!
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

紫舞幽

金虫 (正式写手)


0112358(金币+1,VIP+0):欢迎常来程序版交流回帖 8-16 21:54
VB的不太懂,不过要求三个数之间的误差都小于5%时,LZ可以设假如任意2个数之间的误差大于5%时,则退出程序...
2楼2009-08-16 21:53:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zzhhmc

木虫 (正式写手)

谢谢,但是如何判断它们之间的误差呢?
3楼2009-08-18 18:38:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhoulon

至尊木虫 (著名写手)

★ ★
spc08(金币+2,VIP+0):感谢回复! 8-19 07:44
你可以先编写一个主程序,在主程序里面读入这三个变量,或者给这三个变量进行赋值,然后编制一个子程序(这个子程序由上述三个变量中的两个变量组成,具体调用的实参不同,程序调回来的变量值也是不同的。为了要好处理你的问题,你可以在这个子程序里面对调用的两个实参进行大小绝对值大小判断,同时要进行你上面的相对误差计算),利用这个主程序,将子程序计算的相对误差传送回来就可以了。记住,你有三个数,就组成三对变量,需要调用这个子程序三次。
4楼2009-08-18 23:58:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhoulon

至尊木虫 (著名写手)

★ ★
loovfnd(金币+2,VIP+0):好! 8-21 08:47
你可以先编写一个主程序,在主程序里面读入这三个变量,或者给这三个变量进行赋值,然后编制一个子程序(这个子程序由上述三个变量中的两个变量组成,具体调用的实参不同,程序调回来的变量值也是不同的。为了要好处理你的问题,你可以在这个子程序里面对调用的两个实参进行大小绝对值大小判断,同时要进行你上面的相对误差计算),利用这个主程序,将子程序计算的相对误差传送回来就可以了。记住,你有三个数,就组成三对变量,需要调用这个子程序三次。
5楼2009-08-18 23:58:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

magic7004

金虫 (职业作家)

误差是指什么意思呀?
流氓不可怕,可怕的是流氓有文化,有文化又BH的流氓无敌~~!
6楼2009-08-19 08:32:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zzhhmc

木虫 (正式写手)


0112358(金币+1,VIP+0):欢迎来到程序版回帖讨论 8-19 20:48
大家看看是不是可以这样:if Abs((q1-q2)/q1>0.05) or Abs((q1-q3)/q1>0.05) or Abs((q2-q3)/q2>0.05) Then
  exit
elseif
  q=q1+q2+q3
大家看看对不对。谢谢
7楼2009-08-19 12:03:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

magic7004

金虫 (职业作家)


0112358(金币+1,VIP+0):欢迎来到程序版回帖讨论 8-19 20:48
应该是 (q1-q2)/q1>0.05 还是 (q2-q1)/q2>0.05呢?
流氓不可怕,可怕的是流氓有文化,有文化又BH的流氓无敌~~!
8楼2009-08-19 20:26:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zzhhmc

木虫 (正式写手)

楼上的,对啊,这正是我不解的问题。谢谢!大家看看还有没有其它的好方法呢?
9楼2009-08-20 08:17:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

nono2009

超级版主 (文学泰斗)

No gains, no pains.

优秀区长优秀区长优秀区长优秀区长优秀版主

★ ★
zzhhmc(金币+2,VIP+0): 11-1 14:00
IF max {abs(q1-q2)*2/(q1+q2), abs(q2-q3)*2/(q2+q3), abs(q3-q1)*2/(q3+q1)} < 0.05, THEN ...

Don't exactly know how VB expresses this, but should be easy.
10楼2009-08-21 13:20:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zzhhmc 的主题更新
普通表情 高级回复(可上传附件)
信息提示
请填处理意见