2021年浙江省信息技术押题试卷(1月份)(二)(选考)
发布:2024/11/29 10:0:2
一、选择题(本大题共12小题,共24分)
-
1.小明为推销自己种植的水蜜桃,开通了一个微信公众号发布销售信息。下面说法正确的是( )
组卷:9引用:2难度:0.6 -
2.疫情期间,医院感染科的张医生主动报名去湖北武汉支援。在汉期间,他能登陆其在原医院办公室的计算机并进行管理。这是使用了因特网服务的( )功能。
组卷:0引用:2难度:0.5 -
3.用Word编辑某文档,操作界面如图所示。
则以下说法正确的是( )组卷:0引用:1难度:0.5 -
4.使用UltraEdit软件查看字符内码,部分界面如图所示:
下列说法正确的是( )组卷:5引用:2难度:0.5 -
5.用 Flash 制作动画作品,其中一个场景的部分时间轴及声音属性界面如图所示,“按钮”图层 最后一帧设置了 stop( );动作命令,下列说法正确的是( )
组卷:6引用:2难度:0.4
二、非选择题(本大题共4小题,共26分)
-
15.“5421BCD“码是一种采用四位二进制数表示一位十进数的编码,其各位的权依次为5、4、2、1,并要求大于等于5的十进制数所对应的编码最高位为1(如十进制数7所对应的“5421BCD”码为1010).转换时,将十进制数从右至左按位转换成对应的“5421BCD”码,然后依次连接.小王编写了一个VB程序,中文本框Text1中输入十进制数,单击“转换”按钮Command1,则文本框Text2中显示对应的“5421BCD”码.程序运行界面如图所示.
(1)观察代码,单击“转换”按钮触发的事件处理过程名是
(2)为实现上述功能,请在横线处填入合适的代码.①
Private Sub Command-Click( )
Dim x As Long,y As String,a As Integer
Dim al As Integer,a2 As Integer,a3 As Integer,a4 As Integer
x=Val(Text1.Text)
y=''''
Do While
a=x Mod 10
x=x\10
a1=a\5:a=aMod5
a2=a\4:a=aMod4
a3=a\2:a=aMod2
a4=a
y=
Loop
Text2.Text=y
End Sub
(3)如果输入的十进制数为62,则对应的“5421BCD”码为组卷:3引用:2难度:0.3 -
16.某种字符加密方法描述如下:
①将明文字符串s中的每个字母字符根据它所在的位置往后移动相应的位置,并转化为对应的小写字母(例如:大写字母A往后移动5位变成F,转化成小写字母得到f;小写字母y往后移动8位得到g,转化成大写字母得到G),非字母字符不处理,得到新串ss。
②将①得到的新串ss从中切割成两部分,再将后面一段字母依次逐个插入前一段字符后边,组成一段密文。
例如“Good.Luck!”生成密文过程如下:
①明文字符串s移位和大小写转换过程:下标位置 1 2 3 4 5 6 7 8 9 10 原始字符 G o o d . L u c k ! 向后移动i位 H q r h . R b k t ! 大小写转换 h Q R H . r B K T !
n为偶数:[1 n\2]、[n\2+1 n];
n为奇数:[1 n\2、n\2+1]、[n\2+2 n]。
例如将上述①得到的字符串中6~10位置的字符依次逐个连接在1~5字符后面,生成密文如图a所示:
(1)已知采用上述加密方法得到的密文是“iTCDS!”,则明文为
(2)根据上述加密算法,小高设计了一个字符串加密程序,运行界面如图b所示,请在横线处填入合适的代码。
Private Sub Command1_Click ( )
Dim s As String,ss As String,mw As String,C As String
Dim n As Integer,i As Integer,j As Integer
s=Text1.Text:n=Len(s)
For i=1 To n
C=Mid(s,i,1)
If iszm(c)Then
ss=
Else
ss=ss+C
End If
Next i
i=1:j=n\2+1
If n Mod 2=1 Then j=j+1
Do While i<=n\2
mw=
i=i+1:j=j+1
Loop
If n Mod 2=1 Then mw=
Text2.Text=mw
End Sub
Function iszm(c As String)As Boolean
iszm=False
If c>=“a“And c<=“z“Or c>=“A“And c<=“Z“Then iszm=True
End Function
Function movec(x As String,w As Integer)As
String
If x>=“a“And c<=“z“Then
movec=Chr((Asc(x)-97+w)Mod 26+65)
Else
movec=
End If
End Function组卷:1引用:1难度:0.3