填空题

阅读下面程序。 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