未分类题
设有如下程序:
Private Sub Form_C1ick()
Dim s As Long,f As Long
Dim n As Integer,i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是
0)35
A.32
B.33
C.34
【参考答案】
B
解析:i=1时,f=f*i=1*1=1,s=s+f=0+1=1.i=2时,f=f*i=1*2=2,s=s+f......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
<上一题
目录
下一题>
热门
试题
未分类题
阅读下面的程序段: a=0 For i=1 To 3 For j=1 To i For k=j To 3 a=a+1 Next k Next j Next i 执行上面的程序段后,a的值为
点击查看答案
未分类题
设有如下程序: Private Sub Form_Click() Dim i As Integer,x As String,Y As String x=”ABCDEFG” For i=4 To 1 Step-1 y=Mid(x,i,i)+y Next i Print y End Sub 程序运行后,单击窗体,输出结果为
点击查看答案
相关试题
当使用魔棒工具选择图像时,在“容差”数值...
在拼合图层时,会将暂不显示的图层全部删除...
显示与隐藏参考线快捷键是Ctrl+H()
采用该战略有可能面临哪些障碍?如何解决?
From this passage we can learn tha...