填空题

阅读程序： 　　Option Base1 　　Private Sub Form_Click( ) 　　　　Dim a(3)As Integer 　　　　Print“输入的数据是：”； 　　　　For i＝1 To 3 　　　　　　a(i)=InputBox(“输人数据”) 　　　　　　Print a(i)； 　　Next 　　Print 　　If a(1)a(3) Then 　　　　　m=a(2) 　　Else If a(1)>a(3)Then 　　　　　m=【 】 　　Else 　　　　　m=【 】 　　End If 　　Print“中间数是：”；m 　End Sub 程序运行后，单击窗体，在输入对话框中分别输人三个整数，程序将输出三个数中的中间数，如图所示。请填空。

点击查看答案