作业帮求几道有关VFP的题的答案1.求[1,30]之间所有偶数的乘积;2.已知S=1*2*2…*N,当S>800时退出,求此时最小的S值;3.求S=1!+2!+…+n!4.求S=1+1/(1!)+1/(2!)+…+1/（n!)5.求Y=1+1/（1+2）+1/（1+2+3）+…+1/（1+2+…+n)谢谢!
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/15 07:35:41
![求几道有关VFP的题的答案1.求[1,30]之间所有偶数的乘积;2.已知S=1*2*2…*N,当S>800时退出,求此时最小的S值;3.求S=1!+2!+…+n!4.求S=1+1/(1!)+1/(2!)+…+1/（n!)5.求Y=1+1/（1+2）+1/（1+2+3）+…+1/（1+2+…+n)谢谢!](/uploads/image/z/12530159-71-9.jpg?t=%E6%B1%82%E5%87%A0%E9%81%93%E6%9C%89%E5%85%B3VFP%E7%9A%84%E9%A2%98%E7%9A%84%E7%AD%94%E6%A1%881.%E6%B1%82%5B1%2C30%5D%E4%B9%8B%E9%97%B4%E6%89%80%E6%9C%89%E5%81%B6%E6%95%B0%E7%9A%84%E4%B9%98%E7%A7%AF%3B2.%E5%B7%B2%E7%9F%A5S%3D1%2A2%2A2%E2%80%A6%2AN%2C%E5%BD%93S%3E800%E6%97%B6%E9%80%80%E5%87%BA%2C%E6%B1%82%E6%AD%A4%E6%97%B6%E6%9C%80%E5%B0%8F%E7%9A%84S%E5%80%BC%3B3.%E6%B1%82S%3D1%21%2B2%21%2B%E2%80%A6%2Bn%214.%E6%B1%82S%3D1%2B1%2F%281%21%29%2B1%2F%282%21%29%2B%E2%80%A6%2B1%2F%EF%BC%88n%21%295.%E6%B1%82Y%3D1%2B1%2F%EF%BC%881%2B2%EF%BC%89%2B1%2F%EF%BC%881%2B2%2B3%EF%BC%89%2B%E2%80%A6%2B1%2F%EF%BC%881%2B2%2B%E2%80%A6%2Bn%29%E8%B0%A2%E8%B0%A2%21)
求几道有关VFP的题的答案1.求[1,30]之间所有偶数的乘积;2.已知S=1*2*2…*N,当S>800时退出,求此时最小的S值;3.求S=1!+2!+…+n!4.求S=1+1/(1!)+1/(2!)+…+1/（n!)5.求Y=1+1/（1+2）+1/（1+2+3）+…+1/（1+2+…+n)谢谢!
求几道有关VFP的题的答案
1.求[1,30]之间所有偶数的乘积;
2.已知S=1*2*2…*N,当S>800时退出,求此时最小的S值;
3.求S=1!+2!+…+n!
4.求S=1+1/(1!)+1/(2!)+…+1/（n!)
5.求Y=1+1/（1+2）+1/（1+2+3）+…+1/（1+2+…+n)
谢谢!好的答案我会追加50分.
求几道有关VFP的题的答案1.求[1,30]之间所有偶数的乘积;2.已知S=1*2*2…*N,当S>800时退出,求此时最小的S值;3.求S=1!+2!+…+n!4.求S=1+1/(1!)+1/(2!)+…+1/（n!)5.求Y=1+1/（1+2）+1/（1+2+3）+…+1/（1+2+…+n)谢谢!
第一题：求[1,30]之间所有偶数的乘积.
clear
set talk off
i=1
s=1
do while i800时退出,求此时最小的N值.
clear
set talk off
i=1
s=1
do while .t.
s=s*i
if s>800
exit
endif
i=i+1
enddo
?"i=",str(i,1),"S=",str(s)
运行结果：i=7 , S=5040
第三题：求S=1!+2!+…+n! .
clear
set talk off
input "n= " to n
S=0
for i=1 to n
q=1
for j=1 to i
q=q*j
endfor
S=S+q
endfor
?S
第四题：求S=1+1/(1!)+1/(2!)+…+1/（n!)
clear
set talk off
input "n= " to n
S=1
for i=1 to n
q=1
for j=1 to i
q=q*j
endfor
S=S+1/q
endfor
?S
第五题：求Y=1+1/（1+2）+1/（1+2+3）+…+1/（1+2+…+n)
clear
set talk off
input "n= " to n
S=0
for i=1 to n
q=0
for j=1 to i
q=q+j
endfor
S=S+1/q
endfor
?S
注：以上程序均在VFP6.0中调试通过.
以上答案不知是否符合追加50分的范畴哈.