栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验 > 笔试题库

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

笔试题库 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

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

[填空题] 下列程序的功能是:单击窗体时将随机生成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 20a(i)=10+Int(90*Rnd)Print a(i); Next i Print i=1: 【9】 Do While i<jt=a(i): 【10】 :a(i)=ti=i+1:j=j-1 Loop For i=1 To 20Print a(i); Next i Print End Sub

正确答案:

[9]j=20 [10]a(i)=a(j)

参考解析:

数组逆序存放其实就是把数组的第一个元素和最后一个元素交换,第二个元素和倒数第二个元素交换,直到所有的元素都交换完毕。算法可描述如下:用变量i记下第一个元数的下标1,用变量i记下最后一个数的下标20;交换a[i]和a[j];i加1指向后一个元素,j减1指向前一个元素:重复上述步骤,直到i≥j为止。[9]处应填给j赋最后一个元素的下标,为“j=20”。[10]处是a(i)和a(j)交换的一条语句,应填“a(i)=a(j)”。

转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/482064.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号