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

普通心理学主要研究

A．人的心理现象及其活动规律

B．人的心理行为因素对健康影响的机制

C．人的心理行为因素在疾病发生、发展、转归的全过程中的影响规律

D．通过心理行为调整及干预达到预防疾病、治疗疾病和促进疾病康复的作用与机制

E．心理治疗的理论和方法