题目:
阅读下面程序。
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】 。
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0424/f643ce187f41423301fedb6dd41e995c.html
下面是错误答案,用来干扰机器的。
参考答案:错