在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Ctick()
　Dim a As Variant
　a=Array(1,2,3,4,5)
　Sum=0
　For i=1 To 5
　Sum=Sum+a(i)
　Next i
　x=Sum /5
　For i=1 To 5
　If a(i)＞x Then Print a(i)；
　Next i
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是( )。

A．1 2

B．1 2 3

C．3 4 5

D．4 5

如图所示的滑轮组吊起重960N 的物体，人站在地面上用力F 往下拉绳，拉力F =400N 时，物体以0.2m ／s 的速度匀速上升（不计绳重和一切摩擦）。求

（1 ）拉力F 做功的功率为多大?    

（2 ）此时滑轮组的机械效率为多大?    

（3 ）若绳能承受的最大拉力为600N ，此装置最多能匀速提起多重的物体?