下列情形中，应认定为过失致人死亡罪的是（）。

A.甲在运输放射性物质过程中违反运输规定，发生事故，造成4人死亡

B.乙在工地塌方之后，仍然强令6名工人进入隧道抢救价值2000万元的机械，6名工人因此遇难

C.丙遭受不法侵害，情急之下失手将不法侵害人打死，法院认为丙防卫过当，应当负刑事责任

D.丁在聚众斗殴中致人死亡

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Dim SW As Boolean
Function func(X As Integer)As Integer
　　If X＜20 Then
　　　　Y=X
　　Else
　　　　Y=20+X
　　End If
　　 func=Y
End Function
Private Sub Form_MouseDown(Button As Integer,_Shift As Integer，X As Single，Y As Single)
　　SW=False
End Sub
Private Sub Form_MouseUp(Button As Integer,_Shift As Integer，X As Single，Y As Single)
　　SW=True
End Sub
Private Sub Command1_Click()
Dim intNum As Integer
　　intNum=InputBox("")
　　If SW Then
　　　　Print func(intNum)
　　End If
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为

A．输出0

B．输出25

C．输出45

D．无任何输出