2018-2019学年浙江省金华市东阳中学高一(下)期中信息技术试卷
发布:2024/4/20 14:35:0
一、选择题(本大题共10小题,每小题2分,共20分,每小题列出的四个备选项中只有一个是符合题目要求的,不选、错选、多选均不得分.)
-
1.下列数值中,与十六进制数30最接近的是( )
组卷:11引用:5难度:0.5 -
2.算式10D-100B计算结果是( )
组卷:1引用:1难度:0.5 -
3.使用UltraEdit软件观察某段字符的内码,部分界面如图所示,下列说法正确的是( )
组卷:19引用:4难度:0.5 -
4.某FLASH作品的编辑界面如下
完整播放完该场景一次时间需要5秒,如果播放时间延长到10秒,可以将帧频设置为( )组卷:7引用:2难度:0.5
二、非选择题(本大题共4小题,其中第11小题2分,第12小题3分,第13小题4分,第14小题6分,共15分)
-
13.从字符串中找出所有大写字母,并把找出的大写字母显示在Text2中。请完善程序。
Dim x As String,y As String,i As Integer
Dim n As Integer,pd As Boolean
①
y=““
For i=1 To ②
pd=Asc(Mid(x,i,1))
If pd<91 And pd>64 Then'大写字母的ASCII值为[65,90]
③
End If
Next i
Text2.Text=y组卷:2引用:1难度:0.1 -
14.素数只能被1和它本身整除,不能被其他自然数整除。编写VB程序实现如下功能:单击“产生奇数并判断”按钮Command1,随机产生一个三位正奇数显示在文本框Text1中,并在文本框Text2中显示其是否为素数的判断结果。例如,当随机产生的三位正奇数为953时,程序运行界面如图a所示。
(1)在设计程序界面时,应使用图b所示“控件工具箱”中的
(2)实现上述功能的VB程序如下,请在横线处填写合适的代码。
Private Sub Command1_Click ( )
Dim n As Integer,i As Integer
Dim flag As Boolean‘用于标记是否为素数
Randomize
n=Int( ①
Text1.Text=Str(n)
flag=True‘标记为素数
i=3
Do While i<=n-1And flag=True
If n Mod i=0 ②
i=i+2
Loop
If flag=true Then
Text2.Text=Str(n)+“是素数”
Else
Text2.Text=Str(n)+“不是素数”
End If
End Sub
(3)以下选项中,与加框处表达式“n Mod i=0”等价的是
A.n\i=Int(n/i)B.n\i=n/i C.n Mod i=n\i组卷:8引用:2难度:0.4