以下是某商业楼宇财产险业务的部分收费附加条款，按纯风险损失率的费率规章要求，保费金额相同的是（）

A.罢工、暴乱及民众骚乱扩展条款

B.恐怖活动扩展条款

C.合同价格扩展条款

D.放弃代位追偿扩展条款

E.85％扩展条款

以下程序的功能是：将一维组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A (100)依次赋给B(10,1)到B(10,10)。请填空。Option Base 1Private Sub Form_Click()Dim i As Integer,J As IntegerDim A(1 To 100)As IntegerDim B(1 To 10,1 To 10)As IntegerFor i=1 To 100A(i)=Int(Rnd*100)Next iFor i=1 To 【 】 For J=1 To【 】B(i,j)= 【 】Print B(i,j)；Next jPrintNext i End Sub