- 二一组卷

题型：单选题题类：常考题难易度：困难

浙江省“七彩阳光”联盟2017-2018学年高三上学期信息技术期中联考试卷

【加试题】有10个数据：83，90，96，46，44，36，45，47，55，72依次存放在数组元素a(1)到a(10)中，部分VB程序段如下所示：

m=1：k=1

For i=2 To 10

If a(i)<a(i-1)Then

k=k+1

If k>m Then m=k

Else

k=1

End If

Next i

Text1．Text=Str(m)

End Sub

执行该程序段，文本框Text1中显示的是（）

A、2 B、3 C、4 D、5

举一反三

【加试题】一个酵母细胞每10分钟分裂为2个，在下一个10分钟，就有4个细胞，然后，8个、16个、……。一个酵母细胞，经过多少分钟后数目超过100个。解决此问题的部分算法流程图如图所示：

空白矩形框中应该填入的是（）

某商品团购优惠策略的流程图如图所示

当n为100、p为10时，实付金额s的值是( )。

有如下VB程序段：

Dim a As Integer, b As Integer, c As Integer, y As Integer

a=3:b=4:c=4

If a<=b And c<=a Then

y=a+b

ElseIf a<=b or b<=c Then

y=b+c

ElseIf b=c Then

y=a mod c

Else

y=a+b+c

End If

该程序段运行之后，变量y的值为（）

某校举办竞赛，共有15个试题，每做对一题得8分，做错一题倒扣4分，没有未做的题目，小明共得了8分，则他做对了几题。用VB程序来解决这个问题，单击按钮Command1，在文本框Text1中输出答对的题数，在文本框Text2中输出做错的题数，程序代码如下：

Private Sub Command1_Click()

i＝1

____①____

Do While____②____

____③____

j＝j－1 ′④

Loop

Text1.Text＝Str(i)

Text2.Text＝Str(j)

End Sub

某算法流程图如图所示，

执行该算法，输入n的值为13，下列说法正确的是( )

已知变量a=3，那么执行语句a+=6之后，a的值为{#blank#}1{#/blank#}。

相关试卷

公司介绍

服务介绍

帮助中心