数塔问题。一组数字构成如图a所示的数塔，从数塔顶层出发，每个结点可以选择移动至左下方或右下方结点，一直走到塔底为1条路径。求从数塔顶层到塔底各条路径上数字和的最大值。
解决此问题可采用自底至顶分析的方法。如图a所示的数塔中，先从第3层开始分析：如果路径经过第3层的第1个数字12，那么从12到尾结点的路径上数字之和的最大值是当前结点值加上该结点左下方、右下方结点中的较大值，记作f(3，1)=12+14：同理，f(3，2)=7+15，f(3，3)=26+15；再分析第2层，计算f(2，1)、f(2，2)；最后计算出第一层f(1，1)，即为所求结果。
(1)如图a所示数塔各条路径上的数字和的最大值为___________。

(2)编写VB程序，运行界面如图b所示，程序代码如下，请在划线处填入合适的代码，将程序补充完整。
Const n ＝5
Dim a(1 To n^2) As Integer ’ 数组a存储数塔数据，存储结构如图c所示
Dim f(1 To n^2) As Integer ’ 数组f存储从第i层第J个数到底层尾结点的最大数字之和，其存储结构与数组a一样
Private Sub Command l_Click()
’生成数塔，将数据存入a数组中，代码略

①___________________________________
②__________________________________
③__________________________________

读程序，写出下列程序的输出结果
55、s = 1
For j =" 100" To -100 Step -1
s =" s" * j
Next j
MsgBox (s)
上述程序段中s =" s*j" 的执行次数是(    )

A．400

B．401

C．200

D．201

对称字符串的特征是从左到右读和从右往左读是完全一样的。如“abba”是对称的，”abcba”也是对称的。判断字符串是否对称的VB程序段如下：
n = Len(s)  's是判断的字符串

  k = 0: j = n

  For i = 1 To n \ 2

  Next i

  If k = 0 Then Label1.Caption = "对称" Else Label1.Caption = "不对称"

方框中的代码由以下三部分组成：
①j = j - 1
②If c1< >c2 Then k = k + 1
③c1 = Mid(s,i,1) : c2 = Mid(s,j,1)
代码顺序正确的是（    ）

A．①③②	B．②③①
C．②①③	D．③②①

下面是一段关于计算变量s的算法：
①变量s的初值是0
②变量i从1起循环到n，此时变量s的值由下面的表达式计算
③s=s+(-1)*I
④输出变量s的值
这个计算s值的算法中，s的代数式表示式（   ）

A．1－2+3－4+…+(-1)n×(n－1)

B．1－2+3－4+…+(-1)n×n

C．1+2+3+4+…+(n－1)+n

D．－1－2－3－…－n

有如下VB程序:
Dim i As Integer, j As Integer, k As string, n As Integer
n = 3
List1.Clear
For i="1" To n
k =″″
For j="1" To i
k = k+″*″
Next j
List1.AddItem k
Next i
该程序运行后, 在列表框List中显示的是(    )

A．	B．
C．	D．