Question

VFP程序设计，计算N=1!+2!+3!+..+n!

麻烦能人帮忙下，速度哈

Answer 1

CLEAR
s=0
input "N=" to N
for i=1 to N
s=s+FACTOR(i)
endfor
?"S=",s

FUNCTION FACTOR(N)
C=1
FOR M=1 TO N
C=C*M
ENDFOR
RETURN C
ENDFUN