阅读下面程序：
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，运行后的输出结果是 【6】 。

某安装公司承担某市写字楼机电安装工程施工总承包。施工内容包括：给排水、电气、通风空调、消防、电梯、建筑智能化工程，工程于2012年8月开工，2013年7月竣工，计划总费用2000万元。（1）电梯工程安装前，施工单位将电梯情况书面报告给相关特种设备安全监督管理部门，告知后即开始施工。（2）电气施工时，由于施工交底不彻底，导致甲工人施工时，电气设备误动作，将乙工人手臂夹断，导致乙工人残疾。（3）全部施工完成后，安装单位积极准备工程竣工验收资料，并进行了预验收，后进行了竣工验收申请。（4）工程竣工验收合格后，建设方立即向公安机关消防机构报送了工程竣工验收报告，有防火性能要求的建筑构件、建筑材料、室内装饰材料符合国家标准或行业标准的证明文件、施工和监测单位的合法身份证明及资质等级证明文件等资料，申请备案。

施工方案需要描述哪些内容？