【简答题】【消耗次数：1】
已知函数 。下面是实现计算该函数的程序，请填空完成以下程序。
Private Sub Command1_Click()
Dim k As Integer, i As Integer, s As Long
n = 5 : k = 1
For i = 1 To n
s = s +[填空]
Next i
Print s
End Sub
Function pow(a As Integer, b As Integer) As Long
Dim i As Integer, t As Long
t = 1
For i = 1 To a
[填空]
Next i
pow = t
End Function
参考答案：
复制
纠错
相关题目
【简答题】
下列程序段的运行结果是[填空] 。
Private Sub Form_Click()
Dim a(3) As Long
a(0) = 1: a(1) = 2: a(2) = 3: a(3) = 4
j = 1
For i = 3 To 0 Step -1
s = s + a(i) * j
j = j * 10
Next i
Print s
End Sub
【单选题】
设有如下程序：
Option Base 0
Private Sub Form_Click()
??? Dim a
??? Dim i As Integer
??? a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
??? For i = 0 To 3
??????? Print a(5 - i);
??? Next
End Sub
程序运行后，单击窗体，则在窗体上显示的是？
①
6?5?4 3
②
5?4?3?2
③
4?3?2 1
④
7?6?5?4
【单选题】
下列程序段的循环结构执行后，i的输出值是_______。
Dim y as Integer
For i = 1 To 10 Step 2
y = y + i
Next i
Print i
①
25
②
10
③
11
④
因为y初值不知道，所以不确定
【单选题】
下面程序的时间复杂度为（）for（i=1，s=0；i=n；i++）{t=1；for(j=1；j=i；j++)t=t*j；s=s+t；}
①
O(n)
②
O(n2)
③
O(n3)
④
O(n4)
【单选题】
窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1_Click()
Dim m(10) As Integer
For k = 1 To 10
m(k) = 12 - k
Next k
x = 8
Print m(2 + m(x))
End Sub
运行程序，单击命令按钮，在窗体上显示的是 。
①
6
②
5
③
7
④
8
【单选题】
设执行以下程序段时依次输入1、3、5，执行结果为______。
??? Dim a(4) As Integer, b(4) As Integer
??? For K = 0 To 2
??????? a(K + 1) = Val(InputBox(请输入数据))
??????? b(3 - K) = a(K + 1)
??? Next K
??? Print b(K)
①
0
②
3
③
5
④
1
【简答题】
有如下程序段：
For i=1 To 3
For j=5 To 1 Step -1
Print i*j
Next j
Next i
程序运行后，语句print i*j的执行次数为[填空]。
【简答题】
以下程序的运行结果是[填空1]。 #include stdio.hvoid main(){int i=1,s=1;do{s+=i++;if (s%7==0)continue;else++i;} while (sprintf(%d\n}
随机题目
【单选题】
二氧化碳灭火系统按应用方式可分为（）
①
A组合分配灭火系统和单元独立灭火系统
②
B高压系统和低压系统
③
C管网灭火系统和无管网灭火系统
④
D全淹没灭火系统和局部应用灭火系统
【多选题】
高、中倍数灭火系统的不适用场所包括（）
①
A不能直接应用于裸露的电器设备
②
B对于硝化纤维素、火药等物质本身能释放氧气及其他强氧化剂而维持燃烧的化学物品，不能使用
③
C由于高倍数、中倍数泡沫破裂后是水溶液，因此不能扑救有遇湿易燃性物品的火灾
④
D不能应用于棉花、橡胶、纺织品
【多选题】
七氟丙烷的优点是（）
①
A有良好的的灭火效率，灭火速度快，效果好，灭火浓度低
②
B对大气臭氧层无破坏作用，在大气中存留时间比1301低的多
③
C不导电，不含水性物质，不会对电器设备、磁带、资料等造成损害，灭火后无残留物
④
D不含固体粉尘、油渍。它是液态储存，气态释放；喷后可自然排出或由通风系统迅速排除
⑤
E七氟丙烷灭火系统所使用的设备、管道及配置方式与1301几乎完全相同，替代更换1301系统极为方便