浙教版初中信息技术九年级上学期期末试卷(11)
年级: 学科: 类型:期末考试 来源:91题库
一、单选题(共10小题)
① 定义三个变量X、Y、T
② 把X中的值传递给T
③ 把1赋值给变量X,把2赋值给变量Y
④ 把T中的值传递给Y
⑤ 把Y中的值传递给X
⑥ 结束
s = 0
For i = 1 To 5
s = s + i
Next i
该程序段运行后,i的值为( )

依次输入x的值为3、2、1、-1后,该算法的输出结果为( )
分析流程图,在代码窗口中①处应填写的代码正确的是( )




二、综合题(共3小题)
图形 |
名称 |
含义 |
|
开始/终止框 |
程序的开始或者结束 |
|
|
对数据进行处理 |
|
输入/输出框 |
数据的输入或输出 |
|
|
根据条件进行判断,选择其中一个分支 |
|
流程线 |
表示流程的走向 |
i=4
a=5
If i > 3 Then a = a + 5
Else a = a + 2
End If
写出本程序段运行后,变量a的值。
c = 0
For i = 1 To 12
If 12 Mod i = 0 Then
c = c + 1
End If
Next i
Text1.Text = Str(c)
程序运行后,在文本框中输出为:。
用VB程序实现水仙花数,如果一个三位数等于它的每个数字的立方的和,则此数称为“水仙花数”,如153=13+53+33 , 故153是水仙花数。求100~999之间的全部水仙花数
Private Sub Command1_Click()
Dim i, j, m, n As Integer
For
i = ´求百位上的数字
j = (n Mod 100) \ 10 ´求十位上的数字
m = n Mod 10 ´求个位上的数字
If Then
Print n; "="; i; "^3+"; j; "^3+"; m; "^3"
End If
Next n
End Sub