A:It is worth that
B:It is really nice
C:Please lower the price
D:That is too dear
Dim x,y As Integer
x=2
y=20
Do While x<y
x =x^2
Loop
如图所示,斜槽轨道下端与一个半径为0.4m的圆形轨道相连接.一个质量为0.1kg的物体从高为H=2m的A点由静止开始滑下,运动到圆形轨道的最高点C处时,对轨道的压力等于物体的重力.求物体从A运动到C的过程中克服摩擦力所做的功(g取10m/s2).