4.4.4循环控制的应用-粤教版(2019)高中信息技术必修一练习(原卷版).doc
4.4.4循环控制的应用-粤教版(2019)高中信息技术必修一练习(解析版).doc
中小学教育资源及组卷应用平台
4.4.4循环控制的应用-粤教版(2019)高中信息技术必修一练习
学校:___________姓名:___________班级:___________考号:___________
一、选择题
1.有如下
VB
程序段:
For
i
=
1
To
Len(Text1.Text)
c
=
Mid(Text1.Text,
i,
1)
If
c
>=
"0"
And
c
<=
"9"
Then
x
=
Val(c)
a((x
+
1)
Mod
10)
=
a((x
+
1)
Mod
10)
+
1
End
If
Next
i
s
=
""
For
i
=
0
To
9...