填空题
阅读程序:
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)={{U}} 【8】 {{/U}}
End lf
If a(2)>a(3) Then
m=a(2)
Elself a(1)>a(3) Then
m={{U}} 【9】 {{/U}}
Else
m={{U}} 【10】 {{/U}}
End lf
Print“中间数是:”;m
End Sub
程序运行后,单击窗体,在输入对话框中分别输入三个整数,程序将输出三个数中的中间数,如图所示。请填空。