更多“下面程序段是计算()公式的。s=0:t=1Fori=1To10t=t*is=s+tNextiA.s=1+2+3+4+5+6+7+8+9+10B.s=1*2 ”相关问题
  • 第1题:

    下面运行程序后,单击命令按钮,输出出的结果是【 】。

    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


    正确答案:s1=24 s2=360
    s1=24 s2=360 解析:程序首先调用循环语句为数组a、b赋值,其中a(i)=i;b(i)=i,且数组。的上下界分别为1和5,接着将数组。作为参数调用Fun过程,在Fun过程中,定义了两个变量t及i,i作为循环语句For的变量,它的初始值和终值分别为数组的上下界,循环体为t =t*a(i),即将a(i)的值乘以t,然后再赋给t,当循环结束后,程序返回的就是数组。中的各元素的积,输出结果为:s=120。注意:函数调用和参数传递。

  • 第2题:

    该程序运行后屏幕显示的结果是__________。

    s=1

    FORi=1 T0 5 STEP2

    s=s+i

    ENDFOR

    ?s

    RETURN


    正确答案:
    10
    本题用到了FOR…ENDFOR循环结构,循环变量是i,步长是2,即每循环一次,i加上2,直到i=5循环结束,由此可知共执行循环3次:i=1时,s=2;i=3时,s=5;i=5时,s=10。 

  • 第3题:

    下面程序段是求π的近似值,当第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


    11

  • 第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


    正确答案:B
    解析:程序调用循环语句对数组b()赋值,b(i)=i,且数组b的上下界分别为1和4;接着将数组b()作为对象,调用Tof过程,在Tof过程中,定义了两个变量t和i,i作为For循环的循环变量,初始值为2,终值为数组b的上界;循环体为"t=ta(i)",即将b(i)的值乘以t,然后在赋给t,当循环结束后,程序返回的就是数组b中除第一个元素以外所有元素值的乘积2×3×4=24,本题为输出结果为t=24。

  • 第5题:

    下面程序的功能是计算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


    b=i+1 b=i+1