求1!+2!+3!+……+n!的值，用GWbasic编写

来源：百度知道 编辑：UC知道 时间：2024/06/13 15:37:47
那个N是需要附的值！10 input“n=”，n
就是输入n=1时出值1，n=2时出值3，n=3时值9，一直到N
急用！谢了！

function test(n)
dim i
dim x=1
dim re=0
for i=1 to n
x=x*i
re=re+x
next
test=re
end function

10 Y=0
20 INPUT N
30 FOR J=1 TO N
40 X=J:GOSUB 90
50 Y=Y+S
60 NEXT J
70 PRINT Y
80 END
90 S=1
100 FOR I=1 TO X 'Factorial of x
110 S=S*I 'S is result
120 NEXT I
130 RETURN