vfp编程题目怎么改错?大侠帮忙!

来源:百度知道 编辑:UC知道 时间:2024/05/23 16:53:47
题目:当N的5时,输出如下图形:
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
错误*******found*********下面的语句
不可以填加删减行(第一个错误我已经改出)

程序为:
clear
inpit "n=" to n
dime a(n,n)
p=n
do while n>0
a(n,n)
a(n,1)
n=n-1
enddo
for i=3 to p
for j=2 to i-1
**********found**********
a(i,j)=a(i-1,j-1)+a(i-1,j)
endfor
endfor
for i=1 to p
?space(3*(p-i+1))
for j=1 to i
*********found*******
??a(i,j)
endfor
endfor

clear
dime a(5,5)
for i=1 to 5
a(i,1)=1
a(i,i)=1
endfor
for i=3 to 5
for j=2 to i-1
a(i,j)=a(i-1,j-1)+a(i-1,j)
next
next

for i=1 to 5
for j=1 to i
@ i,40-2*j+i say str(a(i,j))
endfor
endfor
这是杨辉三角形的正确答案
自己对照吧