填空题

阅读下面程序。 Private Function a(load As Integer) As Single If load < 20 then money=load / 2 else money=20+load end if a=money End Function Private Sub Form Click() Dim load As Integer,fee As Single Load=InputBox("请输入一个数:") Fee=a(load) Print fee End Sub 输入20,运行后的输出结果是 【13】

【参考答案】

40