下列程序是用来计算1+2+3……+10的程序段，请补充该程序。
Dim i, s, k As Integer
s =0: k = 0
For 【9】 To 1
k=k+1
s=s+ k
Next i
Print s

如图所示，滑块A、B的质量均为m，A套在固定竖直杆上，A、B通过转轴用长度为L的刚性轻杆连接，B放在水平面上并靠着竖直杆，A、B均静止．由于微小的扰动，B开始沿水平面向右运动．不计一切摩擦，滑块A、B视为质点．在A下滑的过程中，下列说法中正确的是（　　）

A．A、B组成的系统机械能守恒

B．在A落地之前轻杆对B一直做正功

C．A运动到最低点时的速度为

D．当A的机械能最小时，B对水平面的压力大小为2mg