为了把静电荷导走,油系统内的所有管道、油罐设备、容器以及卸油站等均须有良好的接地措施。
参考答案:对
要打印50个在-100~100之间不同的随机整数,并找出第几个是最大数。给定的程序不完整,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim b() Randomize (12) Do x=Rnd If x>0.5 Then y=1 Else y=-1 t=y*Int(Rnd*100)+1 (13) Do While k<j If t<>b(k) Then k=k+1 ElseExit Do End If Loop If k=j Then ReDim Preserve b(k) b(k)=t Print b(k); j=j+1 End If Loop Until j>50 Print (14) Max=b(1) For n=2 To 50If b(n)>Max Then (15) p=nEnd If Next n Print"最大数是:";Max Print"位置在第";p;"个" End Sub
航空货物运价的使用顺序。