以下算法是用循环结构求数列1,3,5,7,9…前10项的和。完成空缺部分。（每行只能填写一个VB语句）dimiasintegerdimaasintegerdim_刷题宝

题干

以下算法是用循环结构求数列1,3,5,7,9…前10项的和。完成空缺部分。（每行只能填写一个VB语句）
dim i as integer
dim a as integer
dim sum as integer
[1]
i=1
do while i<=10
[2]
sum=sum+a
i=i+1
loop
print sum

上一题下一题 0.99难度填空题更新时间:2015-11-18 05:22:21

答案(点此获取答案解析）

同类题1

素数只能被1和它本身整除，不能被其他自然数整除。编写VB程序实现如下功能：单击“产生奇数并判断”按钮Command1，随机产生一个三位正奇数显示在文本框Text1中，并在文本框Text2中显示其是否为素数的判断结果。例如，当随机产生的三位正奇数为953时，程序运行界面左图所示。

(1)在设计程序界面时，应使用上方右图所示“控件工具箱”中的______(填写相应编号)添加文本框Text1。
(2)实现上述功能的VB程序如下，请在划线处填写合适的代码。
Private Sub Command1_Click()
Dim n As Integer, i As Integer
Dim flag As Boolean ’用于标记是否为素数
Randomize
n = Int(①_____________)*2+1
Text1.Text = Str(n)
flag = True ’标记为素数
i = 3
Do While i <= n - 1 And flag = True
If n Mod i = 0 Then
flag = False
End If
i = i + 2
Loop
If ②______________ Then
Text2.Text = Str(n) + “是素数”
Else
Text2.Text = Str(n) + “不是素数”
End If
End Sub
(3)以下选项中，与加框处表达式“n Mod i = 0”等价的是___________(单选，填字母）。

A． n \ i = Int(n / i)

B．n \ i = n/ i

C．n Mod i = n \ i

同类题2

有如下VB程序段：
S=0
For j=1 to 100
If j/2=int(j/2) then s=s+j
Next j
该程序段被执行后，整数型变量s中存储的是1到100之间的

A．偶数个数

B．偶数之和

C．奇数之和

D．自然数之和

同类题3

For i= 1 To 6
a(i)=i+1
Next i
程序运行后，变量i的值是：

同类题4

有如下VB程序段：
a=1:b=1:n=12
f(1)=a:f(2)=b
For i=3 To n

c=a+b

f(i)=c Mod 4

a=b

b=c

Next i
执行该段程序后,数组元素f(12)的值为（）

同类题5

将以下程序段补充完整。
问题：往一个足够大的盒子里放小球，第一次放1个，第二次放2个，第三次放3个……，即每次放的小球数比上一次多1个。问放到第几次盒子里的小球才能多于300个？输出答案。n 表示放球的次数，sum表示小球的总数。
Dim n as integer , sum as integer
n=0
sum=0
Do While sum<=300
n =____   ① ______
sum =____  ②____
Loop
Print “放到第” & ___   ③___  & “次盒子里的小球才能多于300个”

相关知识点