VFP结构化程序设计

来源：百度知道 编辑：UC知道 时间：2024/06/13 21:33:35
有一数列前两个数是1、1，第三个数是前两个数的和，以后每两个数都是其前两个数之和请编写程序输出这个数列前30个数。
VFP 6.0
赶快 学习VFP6.0 借什么书看的懂些？

**数列 数列第三个数是前两个数的和
clear
do while .T.
input"请输入需要的数:"to n
declare a(n)
a(1)=1
a(2)=2
s=0
for i=3 to n
??a(1)
??a(2)
a(i)=a(i-1)+a(i-2)
??a(i)
s=s+a(i)
endfor
s=s+3
wait"总和为:"+str(s,2)+" 按任意键继续"
wait"是否继续请输入Y或者N:" TO Q
if upper(Q)<>"Y"
wait"正在退出" windows timeout 10
exit
endif
ENDDO

CLEAR
f1=1
f2=1
?f1,f2
FOR i=1 TO 28
t=f1+f2
f1=f2
f2=t
??f2
ENDFOR

n1=1
?s1
n2=1
?s2
s=0
for i = 1 to 28
s=n1+n2
n1=n2
n2=s
?s
endfor

clear
a1=1
?a1
a2=1
?a2
for i=1 to 28
n=a1+a2
?n
a1=a2
a2=n
endfor