下面程序段是计算()公式的。s=0:t=1Fori=1To10t=t*is=s+tNexti
A.s=1+2+3+4+5+6+7+8+9+10
B.s=1*2*3*4*5*6*7*8*9*10
C.s=1!+2!+3!+4!+5!+6!+7!+8!+9!+10!
D.s=1+2*3+3*4+4*5+5*6+6*7+7*8+8*9+9*10
第1题：
下面程序段是求π的近似值，当第n项的绝对值小于1e-5时终止计算。 π/4=1-1/3+1/5-1/7+... Dim n As Long, s As Single Dim t As Single, pi As Single n = 1: t = 1: s = 0 Do While abs（t) ＞ ______ s = s + t n = n + 1 t = （-1)^（n + 1)/（2*n-1) Loop
第2题：
下面程序的功能是计算1-3+5-7+ …… -99+101的值。 ① main（) { int i,t=1,s=0； for（i=1；i＜=101；i+=2) { ① ； s=s+t； ② ； } printf（”%dn”,s}； }
A．t = i * t
B．t = i * （t+1）
C．t = （i+1）* t
D．t = （i-1） * t
第3题：
该程序运行后屏幕显示的结果是__________。
s=1
FORi=1 T0 5 STEP2
s=s+i
ENDFOR
?s
RETURN
第4题：
下面程序段,运行后的结果是
Private Sub Command1_Click
Dim b%(1 To 4), i%, t#
For i=1 To 4
b(i) =i
Next
t=Tof(b() )
Print "t="; t,
End Sub
Function Tof(a() As Integer)
Dim t#, i%
t=1
For i=2 To UBound(a)
t=t a(i)
Next
Tof=t
End Function
A．t=18
B．t=24
C．t=30
D．t=32
第5题：
下面运行程序后，单击命令按钮，输出出的结果是【 】。
Private Sub Command1_Click( )
Dim a% (1 To 5) ,i%, s
For i = 1 To 5
a(i) =i
Next
s = Fun(a)
Print"s="; s;
End Sub
Function Fun(a() As Integer)
Dim t, i%
t=1
For i = LBound(A0To UBound(a)
t=t * a(i)
Next
Fun =t
End Function
第6题：
以下程序求1!+2!+3!+…+10!的累加和，请为下面的程序选择正确的答案
s=0
FOR i=1 TO 10
t=1
FOR j=1 TO ______
t=t*j
NEXT
s=s+t
NEXT
? S
A．10
B．j
C．9
D．i
第7题：
以下程序用于求S=1+3+32+33+…+310的值。
Private Sub Commandl_Click()
S=1
T=1
ForI=1 To 10
T=______
S=S+T
NextI
Print"S="；S
End Sub
第8题：
【程序说明】程序功能是求1!+2!+3!+…+10!的累加和。
【程序】
SET TALK OFF
S＝0
FOR i＝1 TO 10
t＝1
FOR j＝1 TO (5)
t＝t*j
(6)
s=s+ t
NEXT
(7)
SET TALK ON
(5)
A．10
B．j
C．9
D．i
第9题：
以下程序求1!+2!+3!+…+10!的累加和，请为下面的程序选择正确的答案 s=0 FOR i=1 TO 1 0 t=1 FOR j=1 TO____t=t*jNEXTs=s+tNEXT? SA) 10 B）j C）9 D）i