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

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编辑过]

那x（i）怎么定义啊、、？

啊？你原先没有定义好数组是吗？

哦，下面那个是大于号

那不知道i 有多大，怎么定义啊？
数组定义的应该是常数吧，比如dim x(35 ) as single
是这样吗？

定义是没错，不过和题目好象关系不太大。
你看，你不就是想在某个条件下，求出那个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即所求

为什么第一个dowhile语句后有print语句和没有，结果不一样呢/。：？

我哪有写Print语句啊

我要加进去的，要不然结果怎么知道啊？
我一个print语句跟写两个，结果不一样的