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 |