| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1190 人关注过本帖
标题:[原创]我会拉,是斑竹的功劳,辛苦了!
只看楼主 加入收藏
babyspring
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-5-11
收藏
 问题点数:0 回复次数:11 
[原创]我会拉,是斑竹的功劳,辛苦了!

[此贴子已经被作者于2006-5-20 17:40:00编辑过]


搜索更多相关主题的帖子: 功劳 斑竹 辛苦 
2006-05-19 22:19
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
收藏
得分:0 
i=1
x(i)=0.00039
Do While x(i)<=0.1435
a=1.1213(x(i)+0.2)^(-1.5235)
y(i)=a*x(i)/(1+(a-1)*x(i)
x(i+1)=(y(i)+0.000566)/2.4511
i=i+1
Loop
Do While x(i)<=0.8386
If x(i)<=0.3 Then
a=1.1213(x(i)+0.2)^(-1.5235)
Elseif x(i)>=0.3 Then
a=0.8938*x(i)^(-1.0632)
End If
y(i)=a*x/(1+(a-1)*x(i)
x(i+1)=(y(i)-0.2843)/0.661
i=i+1
Loop

i即为所求

不过有个问题:
若x(i)<=0.3,a=1.1213(x(i)+0.2)^(-1.5235)
若x(i)>=0.3,a=0.8938*x(i)^(-1.0632)
那当x(i)=0.3的时候,到底该用哪一个式子呢?

[此贴子已经被作者于2006-5-20 10:39:16编辑过]


E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-05-20 10:39
babyspring
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-5-11
收藏
得分:0 
那x(i)怎么定义啊、、?
2006-05-20 15:13
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
收藏
得分:0 
啊?你原先没有定义好数组是吗?

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-05-20 15:16
babyspring
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-5-11
收藏
得分:0 
哦,下面那个是大于号
2006-05-20 15:28
babyspring
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-5-11
收藏
得分:0 
那不知道i 有多大,怎么定义啊?
数组定义的应该是常数吧,比如dim x(35 ) as single
是这样吗?
2006-05-20 15:30
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
收藏
得分:0 

定义是没错,不过和题目好象关系不太大。
你看,你不就是想在某个条件下,求出那个i吗?对xi没什么要求吧?那就不用定义数组了,麻烦,只求i的话:
i=1
x=0.00039
Do While x<=0.1435
a=1.1213(x+0.2)^(-1.5235)
y=a*x/(1+(a-1)*x
x=(y+0.000566)/2.4511
i=i+1
Loop
Do While x<=0.8386
If x<=0.3 Then
a=1.1213(x+0.2)^(-1.5235)
Elseif x>=0.3 Then
a=0.8938*x^(-1.0632)
End If
y=a*x/(1+(a-1)*x
x=(y-0.2843)/0.661
i=i+1
Loop

i即所求


E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-05-20 15:36
babyspring
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-5-11
收藏
得分:0 
为什么第一个dowhile语句后有print语句和没有,结果不一样呢/。:?
2006-05-20 16:02
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
收藏
得分:0 
我哪有写Print语句啊

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-05-20 16:10
babyspring
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-5-11
收藏
得分:0 
我要加进去的,要不然结果怎么知道啊?
我一个print语句跟写两个,结果不一样的
2006-05-20 16:12
快速回复:[原创]我会拉,是斑竹的功劳,辛苦了!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.032269 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved