首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是由随机函数产生100个在200~700之间的整数,然后找出最大者,并记下是第几个数,但程序不完整,请选择适当的内容在下划线处将程序补充完整。 Dim a(100) For j=1 To 100 a(j)=Int(Rn
下面程序的功能是由随机函数产生100个在200~700之间的整数,然后找出最大者,并记下是第几个数,但程序不完整,请选择适当的内容在下划线处将程序补充完整。 Dim a(100) For j=1 To 100 a(j)=Int(Rn
admin
2013-04-11
59
问题
下面程序的功能是由随机函数产生100个在200~700之间的整数,然后找出最大者,并记下是第几个数,但程序不完整,请选择适当的内容在下划线处将程序补充完整。 Dim a(100) For j=1 To 100 a(j)=Int(Rnd*501+200):Print a(j) Next j : Print p=1 : max= ______ For j=2 To 100 If a(j)>max Then max=a(j) : p=j Next j Print "The largest number is " ; max Print "The position is"; p End
选项
A、0
B、a(1)
C、1.7E+38
D、1.7E-38
答案
2
解析
Rnd随机数函数产生一个在(0,1)区间的任意一个单精度随机实数(不含0和1)。 Int函数返回不大于自变量的最大整数。数组a用来存放100个随机数。此程序的第一个For循环,其中Int(Rnd*501)产生0~500的随机整数,Int(Rnd*501)+200产生200~700的随机整数,该For循环的功能是产生100个在200~700间的整数,并将它们存放在一维数组a中。程序的后半部分的功能是在数组中依照从第一个元素到最后一个元素的顺序,查找最大的一个数并将之赋值给max,并且找出最大数所在的位置,并把它赋值给p。max是当前查找的元素中的最大值,p记录该元素的位置,显然在下划线处应填写数组的第一个元素,即a(1)。
转载请注明原文地址:https://kaotiyun.com/show/iOhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序的功能是计算给定正整数序列中奇数之和y与偶数之和x,最后输出x平方根与y平方根的乘积。请在画线处填上适当的内容使程序完整。PrivateSubForm_Click()a=Array(3,6,8,11,64,13,24,
下列程序运行时输出的结果是PrivateSubForm_Click()Dimxx=Array(“天天向上”,“清华大学”,“天上人间”,“程序设计”)Fori=LBound(a,1)toUBound
下面说法不正确的是
下列内部排序方法中,稳定的排序方法是______。
在面向对象方法中,允许作用于某个对象上的操作称为【】。
在窗体上有一个文本框控件,名称为TxtTime一个计时器控件,名称为Timer1,要求每1秒钟在文本框中显示一次当前的时间,程序为:PrivateSubTimer1______()TxtTime.text=TimeEn
软件测试一般是通过设计测试实例来实现的,它又分为黑箱法和白箱法两类,经验表明,在黑箱测试可选的多种方法中,往往首先使用的是______。
执行如下两条语句后,窗体上显示的是______。a=8.4326PrintFormat(a,"$00,00.00")
双击窗体中的对象后,VisualBasic将显示的窗口是
描述“X是小于100的非负整数”的VisualBasic表达式是【】。
随机试题
下列矩阵系统中,最复杂的解决问题的方案是()。
Ifyou’redrivinginBrooklyn,Ohio,andfindyourselfattractedbyyoursurroundings,resisttheurgetogetholdofyourcell
反射回声频率的改变,取决于反射体的运动,这称为
按民用建筑设计要求,建筑基地地面坡度的最小值应为:[2007-74]
出现( )等情况,经中国证监会、财政部批准,期货交易所、期货公司可以暂停缴纳保障基金。
Manychildrenwould______watchTVthandosports.
感性认识向理性认识飞跃的条件有()。
关于单项资产风险的度量,下列说法不正确的是()
简述影响无形资产评估价值的因素。
Acarismadeupofmorethan30000parts.Eachpartinanewcarisasweakasababy.Soanewcarrequirespropercareands
最新回复
(
0
)