填空题
阅读程序：
Option Base 1
Private Sub Form_Click( )
Dim a(3)As Integer
Print“输入的数据是：”；
For i=1 to 3
A (i)=Input Box(“输入数据”)
Print a (i)
Next
Print
If a(1)＜a(2)Then
t=a(1)
a(1)=a(2)
a(2)= 【8】
End lf
If a(2)＞a(3) Then
m=a(2)
Elself a(1)＞a(3) Then
m= 【9】
Else
m= 【10】
End lf
Print“中间数是：”；m
End Sub
程序运行后，单击窗体，在输入对话框中分别输入三个整数，程序将输出三个数中的中间数，如图所示。请填空。
【参考答案】
[8]t
[8]t
热门
试题