有下列程序，程序运行后单击命令按钮，则输出的结果是( )。 Private Sub Command1_Click() Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2# For i=1 To 4 a(i)=i Next i For i=3 To 6 b(i)=i Next i s1=Factorial(a) s2=Factorial(b) Print"s1=";s1;"s2=";s2 End Sub Function Factorial(a() As Integer) Dim t#,i% t=1 For i=LBound(a) To UBound(a) t=t*a(i) Next i Factorial=t End Function

A．s1=360 s2=24

B．s1=24 s2=360

C．s1=24 s2=24

D．s1=360 s2=360

男孩子7岁，眼睑浮肿3d，伴尿少，尿色呈深荼样，入院前2h，突然头痛，伴呕吐2次，视物模糊不清，查体：体温，37.2℃，血压21/15kPa（160/100mmHg），神志不清，四肢小抽动，瞳孔等大，全身轻度非凹陷性浮肿，心率80/min，治疗的首选药物是：（）

A.25%硫酸镁静脉注射

B.利血平肼苯达嗪

C.硝普钠

D.氯丙嗪利血平

E.利血平大剂量口服