信息技术选考字符串大题.docx
- 文档编号:14509001
- 上传时间:2023-06-24
- 格式:DOCX
- 页数:20
- 大小:231.23KB
信息技术选考字符串大题.docx
《信息技术选考字符串大题.docx》由会员分享,可在线阅读,更多相关《信息技术选考字符串大题.docx(20页珍藏版)》请在冰点文库上搜索。
信息技术选考字符串大题
1.随机产生集合{T,1}中任意一个数的VB表达式是()
A.Int(Rnd*2)-1B.Int(Rnd*3)-1
C.Int(Rnd*3)\2-lD.Tnt(Rnd*2)*2-1
2.下列VB表达式中,值最大的是(C)
A.Val(Mid("3.1415926",6,2))
B.Int((Rnd-Rnd+1)/2)*100
C.6790Mod1000\10
D.Int(Rnd*80)+10
3.下列VB表达式的值为False的是(A)
A.50Mod100\50=1B.Int(2*Rnd-Rnd)\2=0
C.Int(Rnd*10)/5<2D."22">"112"
4.下列四个选项中表达式的值与其他不同的是(D)
5.下列表达式的运算结果不等于9的是(以下的字符串都不含空格)(B)
A.Len("2020选考")+Sqr(9)B.Asc("I")-Asc("A")
C.Val(Mid("129",3,1))D.Abs(Int(-8.4))
6.下列VB表达式中,可取到最小值中,最小的为()
A.Rnd-99
B.Fix((-Rnd*45))*2-10
C.(Rnd-Rnd)*100
D.Int(-Rnd*45)*2-10
7.下列VB表达式中,只随机产生10至100之间的奇数的是(D)
A.Int(Rnd*90)+10B.Int(Rnd*90)+11
C.Int(Rnd*45)*2+10D.Int(Rnd*45)*2+11
8.有如下VB程序段:
c=0:
p=0:
q=0
Fori=1To5
b(i)=a(6-i)
Nexti
Fori=1To3
If(b(i)+b(i+1)*2+b(i+2)*3)Mod5=0Thenp=p+1
Else
q=q+1
EndIf
Ifp<=qThenc=c+1
Nexti
数组元素a
(1)到a(5)的值依次为“2,1,2,3,4”,执行该程序段后,c的值为(C)
A.0B.1C.2D.3
9.有如下VB程序段:
s=Text1.Textans="":
k=4
i=k-1:
j=k+1:
n=Len(s)DoWhilek>0
IfMid(s,i,1)=Mid(s,j,1)Then
ans=ans+Mid(s,i,1):
k=k-1
EndIf
i=(n+i-2)Modn+1
j=jModn+1
Loop
Label1.Caption=ans
在文本框Text1中输入“banana”,执行程序后,标签Label1中显示的内容是(B)
A.nanaB.nabaC.naanD.naaa
10.有如下VB程序段:
s=Text1.Text:
Sum=0:
t=0:
cnt=1
Fori=1ToLen(s)
c=Mid(s,i,1)
Ifc>="0"Andc<="9"Then
j=j+1
Else
IfcntMod2=1ThenSum=Sum+Val(Mid(s,i-j,j))
j=0:
cnt=cnt+1
EndIf
Nexti
在文本框text1输入“12d6a3c4f20”,程序运行后Sum的值是(A)
A.15B.21C.25D.45
11.有如下VB程序段:
Dima(1To5)AsInteger
a
(1)=1
Fori=2To5
a(i)=Int(Rnd()*3)+3
Nexti
Fori=2To5
Ifa(i)Mod2=1Then
a(i)=a(i)+a(i-1)
Else
a(i)=a(i)/2
EndIf
Nexti
执行程序后,a数组各元素可能是(B)
A.1,2,6,10,13B.1,4,9,2,7
C.1,5,8,15,22D.1,2,5,11,1
C
13.有如下VB程序段:
b=0
Fora=1To10
b=a+b
a=a+3
Nexta
c=a+b
执行该程序段后,变量c的值为(c)
A.15B.22C.28D.32
14.有如下VB程序段
s=Text1.Text
t=Mid(s,Len(s),1)
Max=0
Fori=Len(s)-1To1Step-1
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 信息技术 字符串