有如下事件过程：
Private Sub Form_Click()
Dim n As Integer
x=0
n=InputBox("请输入一个整数")
For i=1 To n
For j=1 To i
x=x+1
Next j
Next i
Print X
End Sub
程序运行后，单击窗体，如果在输入对话框中输入5，则在窗体上显示的内容是( )

A．13
B．14
C．15
D．16

能增加细胞膜流动性的因素是（）

A.胆固醇

B.长链脂肪酸

C.饱和脂肪酸

D.卵磷脂/鞘磷脂的比例高

E.温度降低