以下程序段运行的结果是 ______。
Dim a(-1 To 5)As Boolean
Dim flag As Boolean
flag=False
Dim i As Integer
Dim j As Integer
Do Until flag=True
For i=-1 To 5
j=j+1
If a(i)=False Then
a(i)=True
Exit For
End If
If i=5 Then
flag=True
End If
Next
Loop
Print j

A．20

B．7

C．35

D．8

啤酒每箱重12kg，包装承压能力为50kg，包装尺寸0.3×0.3×0.25m³，堆放在1.04×1.04m²的托盘上，地坪单位面积载荷为1000kg，库房有效高度为3m，每堆可堆（）。

A、5层

B、7层

C、9层

D、12层