问题
填空题
以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。请在 【8】 和 【9】 处填入适当的内容，将程序补充完整。
Private Sub Form_Click( )
Dim x As Single，amax As Single，amin As Single
x=Input Box("Enter a score")
amax=X
amin=x
Do While 【8】
If x＞ama x Then
Ama x=x
End lf
If 【9】 Then
amin=X
End lf
x=Input Box("Enter a score")
Loop
Print”Max="；amax，"Min="；amin
End Sub
答案
参考答案：[8] x＞0
[9] x＜amin或x＜=amin或amin＞x或amin＞=x
解析： 本题使用了Do While Loop控制语句，在该语句里嵌套了两个If Then语句，分别对应输入数大于amax与输入数不大于amin两种情况。当输入数x大于amax时，则用该数替代前一个已被赋给amax的数；当输入数x不大于amin时，则用该数替代前一个被赋给amin的数。注意，在该循环语句中，x=lnputBox(“Enteraseofo”)很关键，它使得这个循环语句得以进行。
根据本题上面的分析，答案应为x小于或者不大于amin，上面的4种答案是等价的。