问题
填空题
以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输 入负数时结束输入，输出结果。请补充完整下列程序段。 Dim x，amax,amin As Single x=InputBox("Enter a score") amax=x amin=x Do While【】 If x>amax Then amax=x End If If【】Then amin=x End If x=InputBox("enter a score") Loop Print"max="；amax，"min="；amin
答案
参考答案：x>=0
解析：本程序先定义了3个变量，x、amin、amax，它们分别用来接受从键盘输入的字符，最小值和最大值，先用InputBox函数从键盘接受 一个整数并赋给x。然后将x的值赋给amin和amax，作为它们的初值，因为当输入的值为负数时结束循环，所以Do While的控制语句就是判断x的 值是否大于等于“o”；当x大于等于“0”时，执行块形式条件语句，当x大于amax，将x的值赋给amax，显然当x的值小于amin时，就将x的值赋 给amin；每循环一次，就要给x赋值一次，然后接着循环直到x的值是负数时就跳出循环，输出amax和amin的值。
