下列程序的功能是:单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组,然后把数组反序存放,再输出。
Option Base 1
Private Sub Form_Click( )
Dim a(20) As Integer,i As Integer
Dim t As Integer,j As Integer
Randomize
For i=1 To 20
a(i)=10+Int(90*Rnd)
Print a(i);
Next i
Print
i=1: 【9】
Do While i<j
t=a(i): 【10】 :a(i)=t
i=i+1:j=j-1
Loop
For i=1 To 20
Print a(i);
Next i
Print
End Sub

题库:计算机等级考试 类型:填空题 时间:2017-07-03 14:59:43 免费下载:《填空》Word试卷

下列程序的功能是:单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组,然后把数组反序存放,再输出。
Option Base 1
Private Sub Form_Click( )
Dim a(20) As Integer,i As Integer
Dim t As Integer,j As Integer
Randomize
For i=1 To 20
a(i)=10+Int(90*Rnd)
Print a(i);
Next i
Print
i=1: 【9】
Do While i<j
t=a(i): 【10】 :a(i)=t
i=i+1:j=j-1
Loop
For i=1 To 20
Print a(i);
Next i
Print
End Sub

下列程序的功能是:单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组,然后把数组反序存放,再输出。  Option Base 1  Priva

本题关键词:个体指数,组装片数,绕组匝数,组织再生,单个质量参数,个体发展功能,个体享用性功能,导轨架个数,功能重组法,序列位置因素;

微信扫码获取答案解析
下载APP查看答案解析