题目内容:
阅读程序:
Option Base 1
Private Sub Form_Click()
Dima(3)As Integer
Print"输入的数据是:";
Fori=1 To 3
a(i)=InputBox(“输入数据”)
Printa(i);
Next
If a(1)<a(2) Then
t=a(1)
a(1)=a(2)
a(2)=
End If
Ifa(2)>a(3)Then
m=a(2)
Else If a(1)>a(3)Then
m=
Else
m=a(1)
End If
Print"中间数是:";m
End Sub
程序运行后,单击窗体,在输入对话框中分别输入三个整数,程序将输出三个数中的中间数,如下图所示。请填空。
参考答案: