注册

题型：单选题题类：常考题难易度：普通

浙江省之江教育评价联盟2019-2020学年高三上学期信息技术第二次联考试卷

有如下程序段：

Dim a(1 To 5) As Integer

For i = 1 To 5

a(i) = Int(Rnd * 30 + 10)

t = t + a(i) \ 10

Next i

For j = 1 To t \ 3

If j Mod 2 = 1 Then a(j) = a(j) + 1 Else a(j) = a(j) - 1

Next j

运行程序后，数组a各个元素的值，不可能的是（）

A、40,10,32,11,17 B、34,9,33,33,31 C、12,13,14,9,10 D、31,32,33,9,21

举一反三

设A=2,B= - 4，则表达式3*A>5 Or B+8<0的值是{#blank#}1{#/blank#}

小丁想买几张6+1彩票，选号时，他希望前4位用自己的生日：11月8日，即1108，特别号码他选了买彩票日子的个位数5，并且他希望前六个数字组成的数能被他的幸运数字9整除。他的好朋友小杰帮他设计了一个VB程序，可以提供一份符合这些要求的号码清单供他挑选。相应的界面如图1所示。阅读程序并完成后面的问题。

如下图程序，要使Label1中显示的值是30，划线处应该填（）

PRIVATE SUB FORM_CLICK

DIM A（4，4） AS INTEGER

FOR I = 1 TO 4

FOR J= 1 TO 4

IF {#blank#}1{#/blank#}

A（I，J）=1

{#blank#}2{#/blank#}

A（I，J）=0

END IF

PRINT A（I，j）;

{#blank#}3{#/blank#}

PRINT

{#blank#}4{#/blank#}

END SUB

某校最近开设了10节不同内容的选修课，课的编号为1～10。每位同学只能选报一门课。事先让学生做过问卷调查并根据自己的兴趣爱好填写了选课报名志愿表(无重复)，如某同学的报名志愿表为4，1，2，7，3，5，8，10，9，6，表示他最想选报的课的编号是4(第一志愿)，其次为1(第二志愿)，以此类推。学校根据每位学生的问卷调查得分及选课报名志愿表进行了分班，每班30人。
分班方法：优先满足问卷得分最高同学的第一志愿，如果该同学第一志愿所报名人数超过30人，则尝试满足其第二志愿，以此类推，直至该同学选课成功。
编写程序实现选课分配功能并统计各志愿录取率情况：单击读取按钮Command1后，在列表框List1中显示每位学生的相关信息。单击统计按钮Command2后，统计第X志愿录取人数及录取率的统计结果清单，显示在列表框List2中。程序界面如图a所示。实现上述功能的VB程序代码如下，请回答下列问题：

已知x=78，则VB表达式(x Mod 10)*10+x\10/2的值为（）

返回首页

相关试卷

试题篮

公司介绍

Company Introduction

服务介绍

Service Introduction

帮助中心

Help center

二一教育APP

二一教育APP

400-637-9991

周一至周五 8:30-17:30

在线咨询客服