重大危险源监控系统:VB:求S=1！+2！+3！+……+20！的编程代码

来源：百度文库编辑：查人人中国名人网时间：2024/04/30 12:49:32

S=1+2+3+……+20
P=1*2*3*……*20
这两个的编程代码我能写出来了，
但下面这个在郁闷中

S=1！+2！+3！+……+20！

include<stdio.h>
void main()
{int s=0,n,a=1;
for(n=i:i<=20:i++)
{ a=a*i;s=s+a
}
printf("%d",s)}

Function p(ByVal n As Integer)
p = 1
For i = 2 To n
p = p * i
Next
End Function

Private Sub Form_Click()
For j = 1 To 20
s = s + p(j)
Next
MsgBox s
End Sub

循环啊。。。。。。。。。。

VB:求S=1！+2！+3！+……+20！的编程代码 VB编程求s=1/2*2/3*3/5*5/8...的最后一项用VB怎么求s=1-1/2+1/3-1/4+.......1/99-1/100? 用VB计算 S＝1＋2＋3＋……100，代码如下，是否有错？ 3s^4+18s^3+38s^2+32s+12=0求s=? 已知：S(n)=2/1+3/2+4/3+…+(n+1)/n, 求S(n)不超过50的最大值。(C语言) 请问各位VB编程高手,小女子急求VB编程题目1、求1+1/2+1/3+……+1/50的和 s =0 For k = 1 to 10 Step 2 s= s + k Next 该VB程序的解为25,为什么,请给出思考过程用高斯数学的方法求S=1+3+5+7+…+（2n-1)的计算公式已知2S-U分之V-2S=S分之V-S(U,V都是正数,且V+U不等于0,求S,并证S分之1=U分之1+V分之1