Question

VB中的阶乘累加求和1！+2！+3！+4！+5！+6！+7！+8！+9！+10!=?

我是VB的初学者 用for循环解 谢谢 急用！！！！！

Answer 1

Private Sub Form_Load()
Dim i As Integer, j As Integer, sum As Long, jiech As Long
sum = 0
For i = 1 To 10 '求和数
jiech = 0 '求阶乘时赋初始值0
For j = 1 To i '求i的阶乘
jiech = jiech + jiech * i
Next j
sum = sum + jiech '阶乘求和
Next i
Print sum '输出
End Sub

Answer 2

a=0
for i=1 to 10
h=1
for j=1 to i
h=h*j
next j
a=a+h
next i
'a就是结果