2.2选择结构程序同步练习　2022—2023学年人教版高中信息技术选修1

2.2选择结构程序同步练习人教版信息技术选修1 学校:___________姓名：___________班级：___________考号：___________ 一、选择题 1．有如下VB程序段：     result = "" s1 = Text1.Text s2 = Text2.Text i = 1 Do While i <= Len(s1) If Mid(s1,i,Len(s2)) <> s2 Then result = result + Mid(s1, i, 1) i = i + 1 Else i = i + Len(s2) End If Loop 在文本框Text1和Text2中分别输入“Pyyesthon”和“yes”，执行该程序段后，变量result的值是（   ） A．"Pythonyes " B．"yesPython " C．"Pyyesthon " D．"Python " 2．有如下VB程序段： For i = 1 To 4     a(i) = Int(Rnd * 5) * 2 + 1     b(i) = 1 Next i For i = 1 To 3     For j = i + 1 To 4         If a(i) < a(j) Then             b(i) = b(i) + 1         Else             b(j) = b(j) + 1         End If     Next j Next i 执行该程序段后，数组b各元素的值依次是1，4，2，3，则数组a各元素的值可能的是（   ） A．8 1 5 3 B．9 5 7 3 C．1 5 3 9 D．7 3 5 5 3．下列程序段的结构是： if a+b>c and a+c>b  and b+c>a ：      print(“周长：”，a+b+c) else:      print(“不能构成三角形”) A．顺序结构 B．分支结构 C．循环结构 D．以上三项都是 4．下列选项中，与语句＂If x＞188 Then y＝x*0.5 Else y＝x*0.8＂功能相同的是（  ） A．If x>188 Then y=x*0.5 y=x*0.8 B．Ifx<188 Then y=x*0.8 Else y=x*0.5 C．y=x*0.8 If x>188 Then y=x*0.5 D．Ifx>188 Then y=x*0.5 If x<188 Then y=x*0.8 5．有n个整数存放在数组a中，整数k1与k2且k1<k2。某程序段如下： i = 1: L = 0: R = n + 1 Do While i < R If a(i) < k1 Then L = L + 1 If L <> i Then tt = a(i): a(i) = a(L): a(L) = tt i = i + 1 ElseIf a(i) > k2 Then R = R - 1 tt = a(i): a(i) = a(R): a(R) = tt Else i = i + 1 End If Loop 则执行上述代码后，下列说法正确的是（   ） A．数组a变成升序排列 B．a(L)<=k1 C．a(R)>=k2 D．a数组中大于等于k1小于等于k2的元素个数为R-L-1 6．有如下VB程序段： s1 = "algorithm" If Len(s1) Mod 2 = 1 Then   i = Len(s1) \ 2: j = Len(s1) \ 2 + 2   s2 = Mid(s1, i + 1, 1) Else   i = Len(s1) \ 2: j = Len(s1) \ 2 + 1 End If Do While i >= 1   If Mid(s1, i, 1) > Mid(s1, j, 1) Then     s2 = Mid(s1, i, 1) + s2   Else     s2 = s2 + Mid(s1, j, 1)   End If   i = i - 1: j = j + 1 Loop Label1．Caption = s2 执行该程序段后，标签Label1上显示的内容是（   ） A．lortm B．rotlm C．mltor D．lormt 7．下面程序是要实现“输出100以内（包含100）能被3整除的数”，其中空格部分的表达式是（      ）。 Dim I As Integer I=1 Do If __ __ __ Then Print I End If I=I+1 Loop Until I > 100 A．I Mod 3=0 B．I Mod 3<>0 C．Not(I Mod 3<>0) D．