浙教版 高中信息技术 选修1 第四章 VB程序设计初级章末习题（容易程度）（含解析）

1120140011163300选修一第四章VB程序设计初级章末习题（简单程度） 一、选择题（本大题共7小题） 程序设计语言的发展经历 ( ) 、汇编语言及高级语言。 A. 机器语言 B. pascal语言 C. vb语言 D. 自然语言 下列VB程序段的功能为：生成n个不重复的随机整数，保存在数组a中，并升序排序。 Const n ＝ 6 Dim a（i To n） As Integer，f（1 To 10） As Boolean Dim tmp As Integer，i As Integer，j As Integer，t As Integer ’f数组各元素的初值置为False，代码略 For i＝1 To ? ?t ＝ Int（1＋Rnd*10） ? ?If Not f（t） Then ??? a（i）＝t︰f（t）＝ True ??? For j＝ ??? ??If a（j）＜ a（j－1） Then ?? ?????tmp ＝ a（j）︰a（j）＝ a（j－1）︰a（j－1）＝ tmp ?? ???End If ??? Next j Else ?End If Next i 上述程序段3个方框处的表达式分别为 A. （1） n－1? ??（2） 2 to i ????????（3） i ＝ i－1 B. （1） n?? ???（2） i to 2 Step－1?? （3） i＝ i－1 C. （1） n－1? ??（2） 2 to i? ???????（3） t＝ Int（1＋Rnd*10） D. （1） n ?????（2） i to 2 Step－1 ??（3） t＝ Int（1＋Rnd*10） 有如下VB程序段： For i＝1 To 8 ? a（i）＝Int（Rnd*2） Next i sum＝0 For i＝1 To 8 Step 3 ? For j＝i To 8 ??? a（j）＝1－ a（j） ? Next j ? sum ＝ sum ＋ a（i） Next i Text1．Text＝ Str（sum） 执行程序段后，文本框Text1中显示的内容不可能是 A. 0 B. 2 C. 3 D. 4 寻找数组元素a(1)到a(10)中最大值的VB程序段如下： ____①??????? For i = 2 To 10 If a(i) > Max Then_____②???? Next i 划线处最合适的语句是（） A. ①Max=1?? ②Max=i B. ①Max=a(1)?? ②Max=a(i) C. ①Max=1?? ②Max=a(i) D. ①Max=a(1)? ?②Max=i 有如下VB程序： Dim i As Integer, j As Integer, k As String, n As Integer n = 3 List1.Clear For i = 1 To n ??? k = "" ??? For j = 1 To i ????? k = k + "*" ??? Next j ??? List1.AddItem k Next i 该程序运行后，列表框List1中显示的是（???? ） A. B. C. D. 下列VB表达式的值等于6的是（） A. Int(Rnd*5+1) B. Len(Mid(“45678”,3,1)) C. 16 mod 10 D. Abs(-6.3) 为了计算s的结果，设计了如下VB程序段： s = 0 For i = 1 To 10 ??? If i = 1 Then ??? ????__①?? ? ??? ElseIf i Mod 2 = 1 Then ??? ????__②???? ??? Else ??? ????__③???? ??? End If Next i Text1.Text = Str(s) 上述程序中划线处可选语句为 ①s=s+i/(i+1)??? ?②s=s-i/(i+1)??? ?③s=s+i A. ①②③ B. ③①② C. ③②① D. ①③② 二、非选择题（本大题共9小题） 若某类矩阵的大部分数据是相同值（如0），我们可以采用仅记录不相同值（如非0数据）的方式进行压缩．甲同学对m行n列的该类矩阵进行以下处理： ●利用一维数组x存储矩阵：把矩阵第1行到第m行数据逐行依次保存在数组x中， x(1)到x(n)分别存放第1行各个数据，x(n+1)到x(2*n)分别存放第2行各个数据，依次类推． ●? 对数组x中的数据进行压缩：a(1)~a(3)依次存放矩阵的行数、列数及数值0．从数组x的第1个位置开始往后扫描，仅把非0数据所在矩阵中的行号、列号及值保存到a(4)开始的数组元素中．数组a各元素含义如图a所示： 乙同学对数组a中的数据进行转置处理： ●行列转置生成转置矩阵：从第1行到第n行逐行生成转置矩阵，在第i行处理时，扫描数组a，若转置矩阵当前的行号i等于原矩阵元素的列号a(j)(j=5,8,11,……)， 则把 a(j)、a(j-1)及a(j+1)依次保存到数组b相应位置，即可把原矩阵第a(j-1)行a(j)列的数据转置为矩阵第a(j)行a(j-1)列的数据．如有3行4列矩阵的转置过程如图b所示． （1）若m=4，n=3，矩阵数据如下图所示，则数组元素a(7)到a(9)的值 ... ...