初产妇，40周妊娠，规律宫缩17小时，现宫口开大3cm半小时，胎膜未破，先露头，S0

下面程序用“冒泡”法将数组a中的10个整数按升序排列，算法是：从数组的第1个元素开始，依次将相邻的两个数相比较(第1个数与第2个数，第2个数与第3个数……如此重复)，若前面的数较大，则这两个数交换位置。这样执行一遍后，最后一个数已经是数组中最大的数。然后将数组的前n-1个数重复上述过程。如此继续，可将数组排序，请将程序补充完整。
Option Base 1
Private Sub Command1_Click()
Dim a()
a=Array(678，45，324，528，439，387，87，875，273，823)
Fori＝ 【10】
Forj= 【11】
If a(j) 【12】 a(j+1)Then
a1=a(j)
a(j)＝a(j+1)
a(j+1)=al
End lf
Nextj
Next i
For i＝1 To 10
Print a(i)
Next i
End Sub

环状管网水力计算的原理是基于（）守恒的。

A．质量

B．能量

C．动量

D．动量矩

________is known to us all is that the 2012 Olympic Games will take place in London.[    ]

A. It                        

B. What

C. As                        

D. Which

标准的URL由三部分组成：服务器类型、主机名和路径及【 】。

下列说法错误的是( )。

A．与潜水相比，承压水不易受地面污染，水质更稳定

B．在同等地震烈度区内，地基越软，造成的震害越严重

C．为了节约城市建设投资，城市中不同的地区不一定采用统一的防洪设防标准

D．膨胀土和湿陷性黄土受雨水浸泡后，土壤结构会发生变化，导致上部建筑的下沉