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

网织红细胞内被煌焦油蓝染色的颗粒和细网，在电镜下是残留的（），其功能是（）。