VF程序运行时怎么总出现 “v.prg文件不存在” 的提示呢
clearinput"n:"tonfori=1tonstep1s=sqrt(0.0001+(0.0004+0.02*(sqrt(1.8*i-0.0001*i^2)-sqr...
clear
input"n:" to n
for i=1 to n step 1
s=sqrt(0.0001+(0.0004+0.02*(sqrt(1.8*i-0.0001*i^2)-sqrt(1.8*(i-1)-0.0001*(i-1)^2)))^2)
a=10.05*sin(atan(0.04+0.02*(sqrt(18000*i-i^2)-sqrt(18000*(i-1)-(i-1)^2))))+1.05*cos(atan(0.04+0.02*(sqrt(18000*i-i^2)-sqrt(18000*(i-1)-(i-1)^2))))
v(i)=v(i-1)+sqrt(2*a*s)
?"结果:"+str(v(i))
endfor
cancel
这个程序哪错了啊 谢谢大家了 展开
input"n:" to n
for i=1 to n step 1
s=sqrt(0.0001+(0.0004+0.02*(sqrt(1.8*i-0.0001*i^2)-sqrt(1.8*(i-1)-0.0001*(i-1)^2)))^2)
a=10.05*sin(atan(0.04+0.02*(sqrt(18000*i-i^2)-sqrt(18000*(i-1)-(i-1)^2))))+1.05*cos(atan(0.04+0.02*(sqrt(18000*i-i^2)-sqrt(18000*(i-1)-(i-1)^2))))
v(i)=v(i-1)+sqrt(2*a*s)
?"结果:"+str(v(i))
endfor
cancel
这个程序哪错了啊 谢谢大家了 展开
2个回答
展开全部
你后面使用了v(i),这是一个数组,而在前面没有对数组定义,在input后面加上一句:
dime v(n)
dime v(n)
追问
还是不行啊 v(i)=v(i-1)+sqrt(2*a*s) 说这个操作符/操作数类型不匹配 忽略的话
又出现 ?"结果:"+str(v(i))说这个函数参数的值、类型或数目无效
追答
数组定义的下标是从1开始,你的循环从1开始,程序里又有v(i-1),就成了v(0),所以就出错了,你可以在开始给v(1)赋值为0,然后循环从2开始,如:
input"n:" to n
dime v(n)
v(1)=0
for i=2 to n step 1
或者,我看你的程序是一个累加,你不如直接用一个变量k,不用数组:
k=k+sqrt(2*a*s)
?"结果:"+str(k)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询