100个学生的期末成绩存储在数据库中，并已经按学号升序排序，学号编号从1到100。现要求找出成绩最高的学生的得分。如果有多个符合要求的学...

题型：综合题题类：模拟题难易度：普通

浙江省杭州市五县七校2017届高三上学期期中联考信息技术试题

100个学生的期末成绩存储在数据库中，并已经按学号升序排序，学号编号从1到100。现要求找出成绩最高的学生的得分。如果有多个符合要求的学生，只输出学号排在前面的。小吴为此编写了VB程序，程序运行时，单击按钮Command1后，在文本框Text1中输出最大成绩。实现上述功能的VB代码如下，请补全代码

Dim a(1 To 100) As Single '依次存储100个学生成绩

Const n = 100

Private Sub Form_Load()

'本过程从数据库中读取1到100号学生成绩，并存储在数组a中

'代码略

End Sub

Private Sub Command1_Click()

Dim i As Integer, max As single

max = ①

For i = 2 To n

if ②

Next i

Text1.Text = "成绩最高分是：" + Str(max)

End Sub

（1）、程序中①画线处应填入

（2）、程序中②画线处应填入。

举一反三

字符加密：用VB编写某字符串加密解密程序(仅针对ASCII码字符) ，其加密过程如下:

首先，分别求出特加密ASCII字符的ASCII码，然后用7位二进制来表示，比如“4”的ASCII码为十进制52，转换为7位二进制为“0110100”

其次，从左至右依次记为第1、2、3....7位，分别把第3、4、5位取反，即0变1， 1变0，至此“0110100”变为“0101000”，将此二进制转换为ASCII码为40，对应的字符为“(”，即“4”经过加密后得到加密字符左括号“(”。

在文本框Text1中输入ASCII字符，单击命令按钮Command，则在文本框Text2中显示经过加密的字符。VB代码如下，程序界面如图所示。

上述加密与解密过程实际上是可以互逆的，请完成下列问题。

要计算S=1-2+3-4+5……-100以下不正确的程序段是（）

S=0 ：T=1

For i=1 to 100

S=s+i*T

T=-T

Next i

①

S=0

For i=1 to 100

S=s+i*(-1)^(i+1)

Next i

②

S=0

For i=1 to 100

S=s+i*(-1)^i

Next i

③

S=0：S1=0：S2=0

For i=1 to 50

S1=s1+2*i-1

S2=s2+2*i

Next i

S=s1-s2

④

【加试题】有如下VB程序段，该程序段运行后，在文本框Text1中显示的内容是（）

Dim a(1 To 5)As Integer

a(1)=1 : a(2)=2

For i=3 To 5

a(i)=a(1)

For j=i-1 To 2 Step -1

a(j)=a(j)＋a(j－1)

Next j

Next i

Text1.Text=Str(a(3))

某算法部分流程图如图所示。执行这部分流程，依次输入7、-5、12、0，则输出值是（）

求2+4+6+8+10+12+14+……100

PRIVATE SUB FORM-------CLICK()

S=0

DIM I AS INTEGER, S AS INTEGER

FOR I= 2 TO 100 {#blank#}1{#/blank#}

S=S+{#blank#}2{#/blank#}

NEXT I

PRINT S

END SUB

VB提供了结构化程序设计的三种基本结构，三种基本结构是（）。

相关试卷

公司介绍

服务介绍

帮助中心