以下程序的功能是 从键盘上输入若干数据 统计并输出最大值和最小值 当输入负数时结束输入 请填空。 D
以下程序的功能是,从键盘上输入若干数据,统计并输出最大值和最小值,当输入负数时结束输入,请填空。 Dim amax As Single,amin As Single x=InputBox("请输入数据") amax=x amin=x Do While【 】 If x>amax Then amax=x End If If【 】Then amin=x End If x=InputBox("请输入数据") Loop Print "Max=";amax;"Min=";amin End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:x>=0或Not x<0 x<amin或Not x>=amin
第1个填空是结束循环的条件。根据题目要求,在循环体内,需要反复地输入数据,只有当输入负数时才结束输入,即退出循环,也就是说,结束循环的条件就是输入的数是负数,即小于0。最大数通过循环中的第1个条件语句来统计,放在变量amax中,类似地,最小数通过循环中的第2个条件语句来统计,放在变量amin中。
相似问题
在一个窗体上有两个命令按钮 cmdMax 和 cmdMin。单击cmdMax时 窗体上显示“字体由小
在一个窗体上有两个命令按钮,cmdMax 和 cmdMin。单击cmdMax时,窗体上显示“字体由小变大”,字号每次增加2;单击cmdMin时,窗体上显示“字体由大变小
在Visual Basic 的立即窗口内输人以下语句 X=97 ? Chr$ (X) 在窗门中显示的
在Visual Basic 的立即窗口内输人以下语句 X=97 ? Chr$ (X) 在窗门中显示的结果是【 】。请帮忙给出正确答案和分析,谢谢!
下面程序运行后 单击命令按钮 输出的结果是【 】 Private Sub Commandl_Clic
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Commandl_Click( ) Dim a%(1 To 4) ,b%(2 To 6) ,i%,strl,str2 For
运行下列程序 单击Command1命令按钮后 则在窗体上显示第一行和第二行的结果分别是【 】和【 】
运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是【 】和【 】。 Private Sub Command1_Click() t=1:x=2:y=3:z=4
为了在运行时将“d:/pic”文件夹下的图形文件“a.jpg”装入图片框Picture1 所使用的语
为了在运行时将“d: pic”文件夹下的图形文件“a jpg”装入图片框Picture1,所使用的语句为【 】。请帮忙给出正确答案和分析,谢谢!
