2015年综合库信息技术高中练习卷
利用随机数函数产生一定区间内的数据,请问Int(100*Rnd())产生的随机整数范围是( )
| A.[0,100] |
| B.[1,100] |
| C.[0,99] |
| D.[1,99] |
下列VB表达式中,能产生一个3到10之间(包括3,但不包括10)的随机数的是( )
| A.Int(Rnd()*7)+3 |
| B.Int(Rnd()*8)+3 |
| C.Rnd()*7+3 |
| D.Rnd()*8+3 |
下列Visual Basic表达式中,能产生一个10到99之间(包括10和99)随机整数的是( )
| A.Rnd()*89 |
| B.Rnd()*50+10 |
| C.Int(Rnd()*89)+10 |
| D.Int(Rnd()*90)+10 |
Str(Sqr(b^2-4*a*c))运算结果的数据类型是( )
| A.String |
| B.Integer |
| C.Double |
| D.Boolean |
以下函数运算结果不是4的是( )
| A.Int(4) |
| B.Fix(4.1) |
| C.Abs(Int(-4.1)) |
| D.Len("北京奥运") |
阅读如下Visual Basic程序,
Function ave (a As single,b As single) as single
ave=(a+b)2
End Function
Private Sub Command1_Click()
Print ave(4,5)
End Sub
程序运行结果是( )
| A.9 |
| B.4.5 |
| C.5 |
| D.4 |
已知小写字母“a”到“z”在ASCII表中的数值为97至122,则随机产生一个小写字母的表达式为( )
| A.Chr(int(md*26))+97) |
| B.Chr(int(md*25))+97) |
| C.Asc(int(md*26)+97) |
| D.Int(md*26)+97 |
下列不属于赋值语句的是( )
| A.Int(x/2)=x/2 |
| B.Shape1.BackColor=VbRed |
| C.s=1/2*VO*T |
| D.c=2*Pi*R |
随机产生15~60之间正整数(包括15和60)的表达式是( )
| A.Fix(15*Rnd)+60 |
| B.Int(60*Rnd)+15 |
| C.Int(46*Rnd)+15 |
| D.Fix(45*Rnd)+15 |
已知一个二维数组a(1 to 4,-1 to 2),则其数组元素一共有( )个
| A.8 |
| B.12 |
| C.16 |
| D.52 |
在Visual Basic代码窗口中,设x=568,能得到其十位数6的正确表达式是( )
| A.int(x/10) mod 10 |
| B.int(x/10)/10 |
| C.x-(x mod 10)*100 |
| D.x mod 100 |
随机函数Rnd()可以产生一个大于等于0且小于1的随机数,现在想产生一个[8,68]的随机整数,可行的表达式是( )
| A.8+Int(Rnd()*61) |
| B.Int(Rnd()*68 |
| C.8+Int(Rnd()*60) |
| D.8+Rnd()*61 |
下面的程序代码是通过函数求出二个整数型变量a、b中的较大值,其中所定义的函数名是( )
Function max(a,b As Integer) As Integer
If a>b Then max="a" Else max=b
End Function
Private Sub Command1_Click()
Dim a As Integer,b As Integer,s as integer
a=Val(Text1.Text):b=Val(Text2.Text)
s=max(a,b)
Text3.Text=s
End Sub
| A.Command1_Click |
| B.Function |
| C.max |
| D.max(a,b As Integer) |
VB的字符串函数Len(X)的功能是计算字符串的长度,len("1234abc")的值为( )
| A.0 |
| B.7 |
| C.11 |
| D.14 |
已知a=3.69,b=-6,则VB表达式int(-a)+b mod 5的值为( )
| A.-3 |
| B.-4 |
| C.-5 |
| D.-6 |
VB提供了大量的标准函数,可供用户编写程序时直接使用,如数学函数Exp(X)表示( )
| A.求以e为底的X的对数 |
| B.求e的X次方 |
| C.求X的绝对值 |
| D.求X的算术平方根 |
能实现从字符串中取出子字符串功能的VB标准函数的函数名是( )
| A.str() |
| B.mid() |
| C.val() |
| D.abs() |
随机数函数Rnd可以产生一个大于等于0且小于1的随机数,现在想产生一个[5,10]的随机整数,可行的表达式是( )
| A.int(Rnd*6)+4 |
| B.int(Rnd*5)+5 |
| C.int(Rnd*6)+5 |
| D.int(Rnd*10) |
在Visual Basic中,有如下程序:
Private Sub Command1_Click()
Dim a As Integer,b As Integer,c As Integer
Dim d As Integer,z As Integer
a="Val(Text1" Text):b=Val(Text2.Text):c=Val(Text3.Text)
d=max(a,b)
z=max(d,c)
Text4,Text=Str(d)
Text5,Text=Str(z)
End Sub
Function max(x As Integer,y As Integer) As Integer
If x>y Then max="x" Else max=y
End Function
分析该程序段,下列说法正确的是( )
| A.该程序中包含了两个自定义函数 |
| B.在函数max中定义了两个整数型参数 |
| C.在textl,text2,text3中输入数据后程序即被执行 |
| D.函数max的返回值是字符串类型 |
在Visual Basic中,若x=3.1415926,则表达式Int(x*100+0.5)/100的值是( )
| A.3.14 |
| B.3.146 |
| C.314 |
| D.314.6 |
边长为a,b且夹角为x弧度的三角形面积公式是
,计算s的VB表达式是( )
| A.1/2absinx |
| B.1/2a*b*sin(x) |
| C.a*b*sinx/2 |
| D.a*b*sin(x)/2 |
在Visual Basic中,下列表达式的值等于2的是( )
| A.Int(1.7) |
| B.Abs(-2) |
| C.Sqr(4.2) |
| D.Len("0K123") |
以下程序定义了一个通用过程,从以下程序可知这个过程的过程名为( )
Sub output()
Print"*"
End Sub
| A.sub |
| B.End sub |
| C.print |
| D.output |
表达Mid(“1359abcdefg”,1.4)+”123”返回的值为( )
| A.”1123” |
| B.”13123” |
| C.”135123” |
| D.”1359123” |
下列哪个函数的功能是求x的算术平方根( )
| A.Str(X) |
| B.spr(X) |
| C.Sqrt(X) |
| D.Sqr(X) |
已知a,b均为单精度数,这VB表达式(ABS(a-b)+a+b)/2的含义是( )
| A.求a、b中的较大者 |
| B.a等于b |
| C.求a、b中的较小者 |
| D.该表达式的结果一定是a |
骰子是一个正六面体,如果用1~6这六个数字分别代表骰子每面上的点数,下列哪个表达式可以实现掷骰子的效果( )
| A.Rnd*6 |
| B.Int(Rnd*6) |
| C.Int(Rnd*6)+1 |
| D.Rnd*7 |
已知x=-2.3,则VB表达式Int(x)+Len(Str(x+l))的值为( )
| A.0 |
| B.1 |
| C.2 |
| D.3 |
Visual Basic表达式Len("abcd")的值是( )
| A.abcd |
| B."abcd" |
| C.4 |
| D.0 |
在Visual Basic表达式中,Int(Abs(-5.1))的值是( )
| A.-5.1 |
| B.-6 |
| C.5 |
| D.4 |
在计算平均重量X时,结果中产生了许多位小数,若需要对X保留一位小数,并对第二位小数进行四舍五入,则下列表达式中正确的是( )
| A.Int(x*10+0.5)/10 |
| B.Int(x*100+0.5)/100 |
| C.Int(x*10)/10 |
| D.Int(x+0.5) |
Visual Basic函数Fix(x)的作用是截掉数据的小数部分。已知a是实数,当关系表达式Fix(a)=a为真时,则表示a是( )
| A.负数 |
| B.正数 |
| C.整数 |
| D.小数 |
下列VB函数返回值为数值的是( )
| A.Chr(x) |
| B.Str(x) |
| C.Val(x) |
| D.Mid(x,n,k) |
下列VB表达式的值等于3的是( )
| A.Sqr(2)+1 |
| B.Abs(-1)-2 |
| C.Asc("1")+2 |
| D.Len("-2")+1 |
下列VB函数中,返回值类型均为String的是( )
| A.Len和Str |
| B.Asc和Mid |
| C.Chr和Str |
| D.Sqr和Exp |