发布时间 : 星期五 文章2012年9月全国计算机二级Access笔试模拟试卷附参考答案8更新完毕开始阅读
ElseIf j＝2 Then x＝2*x+2*y+2*z ElseIf j＝3 Then x＝3*x+3*y+3*z End if Next k Next j
则x的值为___【10】___。
10. 答案:2346|
【解析】当j＝1时，内层循环执行x＝x＋y＋z＝x＋2三次，所以x＝7；
当j＝2时，内层循环执行x＝2×x＋2×y＋2×z＝2×x＋4三次，所以x＝84；
当j＝3时，内层循环执行x＝3×x＋3×y＋3×z＝3×x＋6三次，所以x＝2346。
则最后结果是x＝2346。
（13）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click() n＝5 f＝1
s＝0 For i＝1 To n f＝f___【13】___ s＝s＋f Next i Print s End Sub
该事件过程的功能是计算s＝1＋1/2！＋1/3！＋…＋1/n！的值。请填空。
13. 答案:*(1/i) 或 /i|
【解析】本程序首先置f为1，s为0；经过5次循环使f每次都乘以1/i，实现了1/n！的求法，每次循环后都加f，把结果再赋给s，循环结束，s的值即为所求。
（14）某次大奖赛有7个评委同时为一位选手打分，去掉一个最高分和一个最低分，其余5个分数的平均值为该名参赛者的最后得分。请填空完成规定的功能。 Sub Command1_Click()
Dim mark!, aver!, i%, max1!, min1! aver = 0 For i =1 To 7
mark = InputBox(\请输入第\位评委的打分\ If i = 1 Then
max1 = mark : min1 = mark Else
If mark < min1 Then min1 = mark
ElseIf mark > max1 Then _max1=mark__【14】___ End If End If
___aver=mark+mark【15】___ Next i
aver = (aver - max1 - min1）/5 MsgBox aver End Sub
14. 答案:max1=mark|aver=aver+mark 或 aver=mark+aver|
【解析】最后得分的计算是先找出7位评委给出的分数中的最高分和最低分，然后执行“(总分-最高分-最低分)/5”得出的结果就是最后得分。程序首先定义了变量aver，并赋初值0，该变量用于存放最后得分。通过for循环“For i =1 To 7”，依次收集评委打分，并判断出最高分和最低分。通过语句“mark = InputBox(\请输入第\位评委的打分\依次获得了7位评委的打分，然后通过“If
i = 1 Then max1 = mark : min1 = mark”语句，将第1位评委的打分 mark的值赋给变量max1和min1，通过语句“If mark < min1 Then min1 = mark”将其他某评委打的分与最低分进行比较，如果其他某评委打的分小于最低分，则将其赋值给min1，即使得min1的值始终保持最低分。否则通过ElseIf判断mark的值是否大于max1，如果大于，则将mark的值赋给max1，即使得max1的值始终保持最高分，所以第14空应该填“max1=mark”。当退出If判断后，需要将当前分数累加到总分aver 中，因此第15空填“aver=aver+mark”，最后通过语句“aver = (aver - max1 - min1) / 5”得出最后得分。
一、选择题（每题2分，共70分)
1. 答案:B
【解析】顺序存储结构中，数据元素存放在一组地址连续的存储单元中，每个数据元素地址可通过公式LOC(ai)=LOC(a1)+(i-1)L计算得到，从而实现了随机存取。对于链式存储结构，要对某结点进行存取，都得从链的头指针指向的结点开始，这是一种顺序存取的存储结构。
2. 答案:D
【解析】栈是限定在一端进行插入与删除的线性表。
栈是按照“先进后出”的或后进先出的原则组织数据的，因此，栈也被