用foxpro计算60的阶乘

怎么用foxpro计算60的阶乘还有1+2！+3！+4！+5！+6！

求大神指教

S=0
FOR j=1 TO 60
S=S+sub_hs(j)
ENDFOR
?S
**n的阶乘
FUNCTION sub_hs
PARAMETERS n
PUBLIC t
t=1
FOR i=1 TO n
t=t*i
ENDFOR
RETURN t
ENDFUNC

虽然能编制，但是数据超限

1、
S=1
FOR I=1 TO 60
S=S*I
ENDFOR
2、
S=0
FOR I=1 TO 6
Z=1
FOR J=1 TO I
Z=Z*J
ENDFOR
S=S+Z
ENDFOR

下载贴吧APP
看高清直播、视频！

分享到: