搜搜考试网vf大神求指教~!编程题!
来源：学生作业帮 编辑：搜搜考试网作业帮 分类：综合作业 时间：2024/06/24 07:25:03
vf大神求指教~!编程题!
1.编程求Fibonacci数列（即0,1,1,2,3,5,……）前30项和
2.编程统计100—10000之间个位数是9的数的个数
3.编程统计1000的正整数约数（因子）的个数（1和1000本身除外）
clear
a=0
b=1
s=0
for i=1 to 28
c=a+b
s=s+c
a=b
b=c
endfor
?s
2.clear
s=0
for i= 100 to 10000
t=str(i)
m=substr(t,len(t))
if m="9" then
s=s+1
endif
next
?s
3.clear
s=0
for i=2 to 999
if 1000%i=0
s=s+1
endif
next
?s
这些答案都对不对啊?求解!
1.编程求Fibonacci数列（即0,1,1,2,3,5,……）前30项和
2.编程统计100—10000之间个位数是9的数的个数
3.编程统计1000的正整数约数（因子）的个数（1和1000本身除外）
clear
a=0
b=1
s=0
for i=1 to 28
c=a+b
s=s+c
a=b
b=c
endfor
?s
2.clear
s=0
for i= 100 to 10000
t=str(i)
m=substr(t,len(t))
if m="9" then
s=s+1
endif
next
?s
3.clear
s=0
for i=2 to 999
if 1000%i=0
s=s+1
endif
next
?s
这些答案都对不对啊?求解!
第1题的结果漏了第1项和第2项的和,所以答案少1.所以不是s=0,而是s=a+b.建议用数组,直观
CLEAR
DIMENSION f[30]
f[1]=0
f[2]=1
s=f[1]+f[2]
FOR i=3 TO 30
f[i]=f[i-2]+f[i-1]
s=s+f[i]
ENDFOR
?s
CLEAR
DIMENSION f[30]
f[1]=0
f[2]=1
s=f[1]+f[2]
FOR i=3 TO 30
f[i]=f[i-2]+f[i-1]
s=s+f[i]
ENDFOR
?s