下列程序执行后，变量X的值为( )。
Dim f1, b, c, d As Single
Dim X As Single
f1=10
b=30
C=400
If b＞f1 Then
d=f1:f1=b:b=d
EndIf
If b＞e Then
x=b
ElseIf f1＞c Then
x=c
Else
x=a
EndIf

A．10

B．30

C．400

D．430

在营业保费等价公式法下，人寿保险费计算应考虑的要素不包括（）。

A.死亡（生存）因素

B.利率因素

C.附加费因素

D.保费支付方式的频率