下图是人体血液循环模式图。A、B、C、D分别代表心脏的四个腔。a～f代表血管，箭头代表血液流动的方向。据图分析作答：（5分）

（1）血液由D出发，回到A的循环途径称为       循环。

（2）图中A与C、B与D之间有房室瓣，其作用是　　　　。

（3）肺泡是气体交换的场所，气体交换是通过     实现的。血液流经肺泡时，肺泡内的氧气进入血液运输至组织细胞进行         释放能量，产生的二氧化碳由血液运输进入肺泡。

（4）f血管内流         血。

以下是一个判断一元二次方程ax²+bx+c=0根的方程的程序，请补充该程序。提示：
·当a＜＞0时有两个根．设delta=b²-4ac，当delta＞0时，有两个不同的实根．当delta=0时，有两个相同的实根。当delta＜0时，有两个不同的虚根。
·当a=0，b＜＞0时，有一个根。
·当a=0、b=0时，方程无意义。
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
Dim c As Single
Dim sb As Single
Dim xb As Single
Dim re As Single
a = InputBox (“请输入a的值”)
c = InputBox(“请输入c的值”)
if 【10】 then
delta = b ^2- 4 * a * c
re = -b/(2 * a)
if 【11】 then
sb = Sqr (delta)/(2 * a)
Print “方程有两个实根”
Elseif delta = 0 then
Print “方程有两个相等实根”
Else
xb = Sqr( - delta)/(2 * a)
Print “方程有两个虚要”
End if
Else
if 【12】 then
ygz = - b / c
Print “方程仅有一个根”
Else
print “方程无意义”
End if
End if
End Sub