高中信息技术：

高中信息技术

下列属于输出设备的是（）

A . 扫描仪、音箱 B . 鼠标、键盘 C . 投影仪、打印机 D . 话筒、绘图仪

人们在严格筛选古今中医临床经验数据的基础上建立计算机数据库，遵循中医辨证实施原理，开发出高智能化的医学应用软件，在现在名医的诊治特点，并实现古今临床名医的联合会诊。这一的应用属于（）

A . 专家系统 B . 机器翻译 C . 远程交流 D . 模式识别

若执行时输入500，700；以上流程图描述的算法执行结果是（）。

A . 1200 B . 500 C . 960 D . 720

有如下Visual Basic程序段：

Dim t as Double, n as Integer

t = 0 : n = 0

For i = 1 to 10 step 2

n = n + 1

t = t + n / i

next i

程序运行后，下列表达式的值与t相等的是（）

A . 1+1/3+2/5+3/7+4/9 B . 1/3+2/5+3/7+4/9+5/11 C . 1+2/3+3/5+4/7+5/9 D . 1+1/2+1/3+1/4+1/5

下列有关网页和邮件的说法，正确的是（）

A . 搜索引擎只能使用文字进行信息检索 B . 将网页保存为“网页，全部”类型，可以将网页中的文字、图片、超链接保存在网页文件中 C . 收件人接收邮件时，使用POP3协议将电子邮件从发件人的计算机读取到本地计算机中 D . 网页是由HTML描述的，编辑HTML的软件有记事本、FrontPage、Dreamweaver

用Flash软件制作动画作品，其中一个场景的部分时间轴界面如图所示。下列说法正确的是（）

A . 当前状态下，可以移动“背景”图层内容的位置 B . 在“夏”图层第21帧插入空白关键帧与清除帧效果一样 C . 在“按钮”图层第1帧清除关键帧，按钮将从始至终一直显示 D . 最后一帧添加脚本“fscommand(“quit”)”，测试影片时动画窗口最后会自动关闭

使用Python语言编写某信息系统，数据存放在SQLite数据库中，将ssex值为“man”的所有记录转换为JSON格式文件，代码如下：

#数据库中获取数据存储在列表中

import json #导入json函数库

① #导入SQLite函数库

conn = sqlite3.connect("test.db")

json_ info=[] #变量json_info存储记录数据

cur = conn.cursor( )

sql= "select * fromstd ② " #查询ssex字段值为“man”的所有记录

cur.execute(sql)

json_ info = cur.fetchal( ) #将符合记录数据保存到变量json_info

conn.commit( )

cur.close( )

conn.close( )

#将记录转换为json格式的数据

file = open('b.json', 'w', encoding-'utf-8') #打开json格式文件

json.dump( ③ , file) #将变量json_info转换为json格式保存到文件中

file.close( )

请回答下列问题：

（1）当前使用的数据库文件名称是，访问的数据表名为。
（2）转换为JSON格式的数据后存储的文件名是。
（3）结合实现上述功能的Python程序，请在划线处填入合适的代码。
① ② ③

某算法的部分流程图如图所示，执行该算法，输出s,c的值是( )

A . 6,15 B . 9,15 C . 6,10 D . 9,10

有如下VB程序段：

Const n = 5

Dim b(n)As Integer

For i = 1 To 5

b(i)= i

Next i

For i = 1 To 2

For j = n – 1 To I Step -1

If a(b(j))> a(b(j + 1))Then

t = b(j):b(j)=b(j + 1):b(j + 1)= t

End If

Next j

Next i

数组元素a(1)~a(5)的值依次为“35，24，45，16，77”，运行上述程序段后，数组元素b(1)到b(5)的值依次为（）

A . 1，3，5，2，4 B . 5，3，1，2，4 C . 2，4，1，3，5 D . 4，2，1，3，5

从国家宏观经济管理角度来看，（）不属于国家信息系统。

A . 税收管理信息系统 B . 社会保障管理信息系统 C . 海关管理信息系统 D . 国家金融管理信息系统

有如下 Python 程序段：

s=”我爱 13aPP14LE！”

ans=res=""

for x in s:

if "a"<=x<="z":

ans=ans+chr(ord(x)-32)

if "A"<=x<="Z":

ans=ans+chr(ord(x)+32)

if "0"<=x<="9":

res=res+x t=ans+res

print(t)

A . 我爱 13aPP14LE B . Apple1314 C . 我爱 Apple1314 D . aPPLE1314

主存储器和CPU之间增加cache的目的是（）。

A . 解决CPU和主存之间的速度匹配问题 B . 扩大主存储器容量 C . 扩大CPU中通用寄存器的数量 D . 既扩大主存储器容量，又扩大CPU中通用寄存器的数量

博客是网络上表达个人思想、存储信息资源的一种工具，作为一种信息表达和管理方式，目前尚不属于博客功能的是( )

A . 免费接听电话 B . 做学习笔记 C . 上传或下载学习资源 D . 分类管理信息资源

运动会田径比赛，记分裁判把各赛道运动员的成绩表交给录入员录入到计算机中，录入人员编制了如下程序｡运行程序，按道次顺序依次输入8个成绩，道次号存放在数组a中，相应道次的运动员比赛成绩存放于数组b中，并将原始成绩显示在列表框List1 中｡单击“成绩排序”按钮(Command1)，将原始成绩从好到差排序，排序结果显示在列表框List2 中｡运行效果如图所示｡

实现上述功能的VB程序如下：

（1）请在划线处填入合适代码｡
Dim a(1 To 8)As Integer   ‘存储道次编号

Dim b(1 To 8)As Single ‘存储运动员成绩

Dim num As Integer

Private Sub Command1_Click()

Dim i As Integer, j As Integer, k As Integer, p As Integer

Dim t As Single

For i=1 To 7

k=i

For j=i+1 To 8

If Then

    k=j

End If

Next j

If k<>i Then

    p=a(i):a(i)= a(k):a(k)= p

    t=b(i):b(i)= b(k):b(k)= t

End If

Next i

For i=1 To 8

List2.AddItem Str(a(i))&“道:”& Str(b(i))

Next i

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)    ’按回车键录入比赛成绩

Dim cj As Single

If KeyAscii=13 Then ‘是否为回车键

num=num+1

cj=Val(Text1.Text)

If cj>0 And num<=8 Then

   a(num)= num



   List1.AddItem Str(a(num))&“道:”&Str(b(num))

Else

MsgBox “输入无效”

End If

Text1.Text=“”

End If

End Sub
（2）在Command1_Click( ) 事件过程中使用的排序算法是 (选填:冒泡/选择)排序｡

当遭遇网络欺凌时，下列措施不可取的是( )。

A . 寻找机会报复对方 B . 把对方加入黑名单 C . 不再与对方有任何来往 D . 要求网站删除恶意言论，情节特别严重，受害人可以报警，让网警第一时间锁定施暴人

有两个杯子A和B，分别盛放酒和水，要求将它们互换，编程解决这个问题时，以下算法正确的是（）

①将A杯中的酒倒在C杯中 ②将B杯中的水倒在A杯中 ③将C杯中的酒倒在B杯中

A . ①③② B . ①②③ C . ②①③ D . ③①②

有如下VB程序段：

S="ABCDEFG"

n=Len（s）

m=Int（Rnd*5+1）

i=0：c=1：ans=""

Do While c<= 3

i=（i+m-1）Mod n+ 1

ans=ans+Mid（s，i，1）

c=c+1

Loop

Text 1.Text=ans

执行该程序段后，文本框中不可能的输出是（）

A . ABC B . CFB C . ECB D . DAE

某电信部门规定：拨打市内电话时，如果通话时间不超过3分钟（含3分钟），则收取通话费0.2元，如果通话时间超过3分钟，则超过部分以每分钟0.1元收取通话费（通话时间为整数）。下面是计算通话费用的程序界面和程序，请认真分析并回答问题。

（1）在设计程序界面时，为添加“确定”按钮，应使用如上右图所示“控件工具箱”中的（填相应编号）添加标签控件。要让Command1显示为“确定”，需要在属性面板中修改的值为“确定”。
（2） Command1_Clik事件过程如下，并请填写程序空白处。
    Private Sub Command1_Click()
    Dim x as  '定义 x 为整型
    x = Val(Text1.Text)
     Then '条件语句
     Text2.Text=
Else
     Text2.Text = Str(0.2 + 0.1 * (x - 3))
     End If
     End Sub
（3）这段程序属于结构程序设计。(填：顺序、选择或循环）

重庆大学的网址是///ww.cqu.edu.cn 其中"edu"代表的意思是（）

A . 政府部门 B . 科研机构 C . 教育网站 D . 中国

关于Access数据表的操作，下列说法正确的是（　　）

A . 修改字段的数据类型，其所对应的字段内容可能会被删除 B . 可以在数据类型为“时间/日期”字段中输入“二零二零年五月一日” C . 某字段数据类型为“自动编号”，则该字段一定是主键 D . 可以在设计表视图中添加记录

高中信息技术：

高中 信息技术

高中信息技术