下面程序段是计算()公式的。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!+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
点击查看答案
【程序说明】程序功能是求1!+2!+3!+…+10!的累加和。【程序】SET TALK OFFS=0FOR i=1 TO 10t=1FOR j=1 TO (5)t=t*j(6)s=s+ tNEXT(7)SET TALK ON(5)A.10B.jC.9D.i
以下程序用于求S=1+3+32+33+…+310的值。Private Sub Commandl_Click()S=1T=1ForI=1 To 10T=______S=S+TNextIPrint"S=";SEnd Sub
以下程序求1!+2!+3!+…+10!的累加和,请为下面的程序选择正确的答案s=0FOR i=1 TO 10t=1FOR j=1 TO ______t=t*jNEXTs=s+tNEXT? SA.10B.jC.9D.i
下面运行程序后,单击命令按钮,输出出的结果是【 】。Private Sub Command1_Click( )Dim a% (1 To 5) ,i%, sFor i = 1 To 5a(i) =iNexts = Fun(a)Print"s="; s;End SubFunction Fun(a() As Integer)Dim t, i%t=1For i = LBound(A0To UBound(a)t=t * a(i)NextFun =tEnd Function
下面程序段,运行后的结果是Private Sub Command1_ClickDim b%(1 To 4), i%, t#For i=1 To 4b(i) =iNextt=Tof(b() )Print "t="; t,End SubFunction Tof(a() As Integer)Dim t#, i%t=1For i=2 To UBound(a)t=t a(i)NextTof=tEnd FunctionA.t=18B.t=24C.t=30D.t=32
该程序运行后屏幕显示的结果是__________。s=1FORi=1 T0 5 STEP2s=s+iENDFOR?sRETURN