查看程序错误在哪clearinput"n:" to ndime v(n)for i=1 to n step 1s=sqr

来源：学生作业帮编辑：搜搜考试网作业帮分类：综合作业时间：2024/06/14 16:55:37

查看程序错误在哪
clear
input"n:" to n
dime v(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
是关于V=∑sqrt(2*a*s) 求和的一个计算程序高手帮看看哪出错了

数组定义的下标是从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)

假定有以下程序段 n=0 for i=1to4 for j =3 to -1 step -1 n=n+1 next j vfp补充程序题目 *** * for n= to 1 step -1 &&控制行 ? (4-n) &&空格数 for 以下程序段执行后整型变量n 的值为 n=0 for i=1 to 20 step 5 n=n+i next I A.50 这个程序的内层循环总次数是几次 for m=0 to 7 step 3 for n =m-1 to m+1 next n Dim m%,n% For m=1 To 3 For n=1 To 5 Step 2 n=n+1 Next n Next 数列求和,sqr(1)+sqr(2)+sqr(3)+......+sqr(n)=?,关于N的公式是什么? 假定,以下程序段,n=0 for i=1 to 3 for j=4 to -1 n=n+i next j next i运 vba程序,n=0 For i=1 to 3 For j=-4 to -1 n=n+1 next j next i 运行一个VBA程序段 sum = 0 n = 0 For i = 1 to 5 x = n/i n = n + 1 sum pascal For i:=1 to n 程序在运行循环“For I=1 to 14 step 3”结束后,I=? basic 语言中的 for i=1 to n step 语句如果i+步长不能等于n 结果会是什么会死循环吗?