【简答题】以下程序用于求s=1+(1+2)+(1+2+3)+……(1+2+……100)的和,请补充完该程序。 Dim n As Integer Dim i As Integer Dim j As Long Dim s As Long n=100 j=0 s=0 For i=1 To【 】 J=【 】 s=【 】 Next i Print s
【简答题】有一座大桥是靠抛物线型的拱形支撑的,它的桥面处于拱形中部(金华市区的双龙大桥就是这种模型)已知桥面在拱形之间的宽度 为40 m ,桥面 离拱形支撑的最高点O的距离为10 m ,且在正常水位时水面宽度AB为48 m (1)建立如图所示的直角坐标系,求此抛物线的解析式; (2)现有一辆载有救援物质的货车正以40 的速度必需经过此桥匀速开往乙地,当货车行驶到甲地时接到紧急通知:前方连降暴雨,造成水位以每...
【单选题】在窗体上添加如下命令按纽,然后编写如下事件过程: Private Sub Command1_Click() Dim a(10)As Integer Dim p(3)As Integer k= 5 For i = 1 To 10 a(i) = i Next i For i = 1 To 3 p(i) = a(i * i) Next i For i = 1 To 3 k = k + p(i) * 2 ...