相关试卷

1、下列应用中，没有使用人工智能技术的是( )

A、美军机器人大狗在战场环境运送辎重 B、百度的以图搜图技术 C、扫描二维码获取微信公众号的过程 D、某公司利用刷脸技术的门禁系统

查看解析
2、关于Access数据库，下列说法正确的是( )

A、数据表中有记录时，该表的字段顺序不能任意调整 B、数据表中有记录时，该表的字段类型无法修改 C、数据表视图下，添加的新纪录必然产生在最后一条 D、数据表视图下，修改某个字段的值后，无法撤销

查看解析
3、下列有关信息及信息技术的说法，正确的是 ( )

A、信息技术近代才发展起来，古代没有信息技术 B、现代信息技术包括摄影技术、广播电视和计算机技术 C、微电子技术是将信息由一点传送到另一点的技术 D、信息的传输与表示离不开载体

查看解析
4、一副纸牌除去大、小王，有♠♥♣◆四种花样各13张，共52张，如果用字母A、B、C、D分别代表黑桃、红桃、梅花、方块，用数字1~13代表纸牌的点数，其中J、Q、K分别用11、12、13代表。
按照某种理牌规则，先按纸牌点数从小到大整理，如果遇点数相同则再按花样♠♥♣◆(A~D)整理，约定俗成，点数3为最小纸牌，K(点数13)之后才是1，2为最大牌。

小催同学运用冒泡排序思想设计了一个去除大、小王后剩下的52张牌中随机抽取17张纸牌(在列表框1中显示)，并按上述理牌规则模拟理牌，将理好的纸牌在列表框2中输出的程序。

程序运行界面如图所示。请回答以下问题：

(1)、程序加框处代码有错，请改正。

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n= 17

Dim s(1 To 17) As String

Private Sub FP_ Click( )

    Randomize

    For i=1 To n

      s(i)= &. Int(Rnd * 13 + 1)     '随机产生一张牌，注：A的ASCII码为65

      For j=1 To i-1     '此程序段，检查产生的牌是否为重复牌

            If s(i)=s(j) Then Exit For

        Next j

      If Then

          i=i-1

      Else

            List1. AddItem s(i)

        End If

  Next i

End Sub

Private Sub LP_ Click( )

  For i=1 To n-1

      For j=n To i +1 Step -1

            d1= Val(Mid(s(j)，2))    'Mid 函数的第3个参数(长度)省略，表示从第2位取到最后

            d0= Val(Mid(s(j-1)，2))

            If Then     '加框处改错

               t=s(j) ： s(j)=s(j-1) ： s(j-1)=t

            ElseIf d1=d0 Then

                If Then

                    t=s(j) ： s(j)=s(j-1) ： s(j-1)=t

                End If

            End If

      Next j

    Next i

    For i=1 To n

      List2. AddItem s(i)

    Next i

End Sub

查看解析
5、无重叠区间。在若干个区间中，删除重复区间，使得剩余区间互不重叠(区间[1，2]和[2，3]虽有边界值2相等，但不认为是重叠区间)。小李设计VB程序，在文本框Text1中输入用逗号分隔的整数，相邻两个整数表示一个区间(任意区间的左边数据小于右边数据)。如图中所示为区间[1，2]，[2，3]，[3，4]，[2，4]。点击“判断”按钮Command1后，删除重复区间[2，4]，在文本框Text2输出满足无重复区间时需要删除的最小区间数量。运行界面如图所示。

(1)、若输入的区间集合为[2，4]，[1，3]，[3，4]，[5，6]，则需要删除区间的最小数量为。

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click( )

   Dim a(1 To 100) As Integer

  Dim i As Integer, j As Integer

  Dim temp As Integer, k As Integer

  Dim res As Integer, ed As Integer

  '从文本框Text1中读入整数存储到数组a中，整数的个数存放在变量k中，代码略

  For i=1 Tok\ 2-1   '以区间左边数据为主要关键字升序排序

        For j=k\2 To i+1 Step-1

            If Then

                temp=a(j*2-1)：a(j*2-1)=a((j-1)*2-1)：a((j-1)*2-1)=temp.

              temp=a(j*2)：a(j*2)=a((j-1)*2)：a((j-1)*2)=temp

            End If

        Next j

   Next i

  ed=a(2)

  res= 0

  For i=2 To k\2     '计算需要删除区间的最小数量

        If Then

            res=res+1

            ed= min(ed, )

        Else

            ed=a(i * 2)

        End If

  Next i

  Text2. Text= Str(res)

End Sub

Function min(x As Integer， y As Integer) As Inte-ger    '函数功能：返回x与y的最小值

'代码略

End Function

查看解析
6、小王创作主题为“童话世界”的多媒体作品。首先使用Photoshop软件制作一张图片，然后使用Flash软件制作动画。请回答下列问题：

(1)、如图a所示，在Photoshop中，以下有可能使“背景.psd”文件图层数量改变的操作是(多选，填字母：A .复制图层/ B .使用“仿制图章”工具仿制图像/ C .添加“图层样式”/ D .使用“画笔”工具修改图像/ E .使用“横排文字"工具添加文字)。

(2)、如图b所示，“火车”图层从11帧到48帧实现火车元件实例的动画效果，则该段动画类型属于(填字母：A .逐帧动画/ B .动画补间/C .形状补间)。

(3)、如图b所示，测试场景时发现“标题”图层30帧到48帧动画具有淡出效果，则该图层第48帧内容的Alpha值设置为才能实现该效果。

(4)、如图b所示，“按钮”图层添加了一个“返回”按钮，若要使该按钮实例在该场景动画播放过程中一直可见，下列操作可行的是 (单选，填字母：

A、选择“按钮”图层的第1帧，执行“删除帧”操作/ B、选择“按钮”图层的第1帧，执行“转换为关键帧”/ C、将“按钮”图层的第48帧移至第1帧/ D、删除“按钮”图层的第1帧至第47帧)

(5)、测试影片时，单击“返回”按钮，实现跳转到“童话镇”场景的第1帧并停止播放，则该按钮添加的动作脚本为

查看解析
7、2016年浙江省各地市GDP情况数据在Excel表中如图a所示。

请回答下列问题：

(1)、区域F3：F14的数据是通过公式计算得到。在单元格F3输入公式，并用自动填充功能完成区域F4：F14的计算，则单元格F5中的公式是。

(2)、如图a所示，删除第15行，单元格F3的值显示为(选填：A .#DIV/0！/B .井REF！/C .36958. 67 / D .0)。

(3)、将区域A2：G14的数据复制到新工作表，在新工作表中对数据进行筛选操作，2016年GDP(亿元)和人均GDP筛选条件均设置为如图b所示，则筛选出的城市有个。

(4)、根据图a中数据制作的图表如图c所示，创建该图表的数据区域是

查看解析
8、有n个连续的自然数，删除首尾两端之外的其中一个数后存储在数组元素a(1)到a(n- 1)中，利用对分查找算法找出这个数的某VB程序段代码如下：
Const n= 10

i=1 : j=n-1

Do While j-i>=2

    m=(i+j) \ 2

    If    ⑴   Then

        i= m

    Else

           ⑵

    End If

Loop

Text1. Text= Str(3) )

上述程序中(1)(2)(3)划线处可选语句有：

①a(j)-a(m)=j-m②a(m)-a(i)=m-i③j=m-1④j=m⑤a(i)+1⑥a(i)

则上述程序中(1)、(2)、(3)划线处的代码依次为(     )

A、①③⑤ B、②④⑤ C、①③⑥ D、②④⑥

查看解析
9、有VB程序段如下：
Dim a(1 To 9) As Integer

Dim m As Integer, k As Integer, i As Integer

a(1)=2 , a(2)=8 , a(3)=6 , a(4)=5 , a(5)=4 , a(6)=3 , a(7)=9 , a(8)=7 , a(9)= 1

m=1 : k=1

For i=2 To 9

    If a(i)<a(i-1) Then

    k=k+1

        If k>m Then m=k

    Else

        k =1

    End If

  Next i

Text1. Text = Str(m)

该程序段运行后，文本框Text1中显示的内容是(     )

A、3 B、4 C、5 D、9

查看解析
10、有如下VB程序段：
For i=1 to 3

  For j=1 to 5-i

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

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

        End If

  Next j

  Text1. Text = Text1. Text+Str(a(i))

Next i

数组元素a(1)到a(5)的值依次为“3，9，6，8，4”。若该程序段执行后，文本框Text1显示的内容是(     )

A、346 B、689 C、364 D、366

查看解析
11、某排序算法，VB代码如下：
i=1

Do While i<=5

    If i=0 Or a(i-1)<=a(i) Then

        i=i+1

    Else

        t=a(i) : a(i)=a(i-1) : a(i-1)=t

        i=i-1

  End If

Loop

数组元素a(0)到a(5)依次为：“0，61，22，43，89，27”，经过该程序段处理后，数组元素a(4)的值为(     )

A、43 B、89 C、61 D、27

查看解析
12、将一个时长为1分钟、采样频率为44.1kHz、量化位数为16、双声道未经压缩的Wave格式音频压缩为MP3格式文件，压缩后的MP3格式文件大小为790KB，则其压缩比约为( )

A、11：1 B、7：1 C、13：1 D、105：1

查看解析
13、关于入工智能，以下说法不正确的是（）

A、在很多酒店，人靠近大门，门会自动打开，这是应用了人脸识别技术 B、Siri专家系统属于人工智能的应用 C、大数据的应用，为人工智能的发展开拓了广阔空间 D、一款具有“拍题搜答案”功能的APP，可能应用了OCR技术

查看解析
14、有多人在不同楼层要乘坐同一部电梯，所有人都是去往更高楼层，电梯初始位置为第一批用户出发的楼层位置。电梯在运行时，上升一层需耗时3秒，在某一层停留时(含电梯初始位置和电梯结束位置)，不论有多少人进出都算8秒。小马同学利用，上述算法编写了一个VB程序，在列表框list1中显示所有人的出发与到达楼层，按照出发楼层升序(出发楼层相同按到达楼层升序)排序，在列表框list2中输出排序后结果，最后在文本框Text1 中输出电梯本次运行的总时间。程序运行界面如图所示，回答下列问题：

(1)、若有5批用户出发与到达楼层分别是“10-25、5-15、15-20、15-30、5-10”，按照上述电梯运行规则，则电梯本次运行的总时间为秒，

(2)、给划线处填上合适代码，使程序完整。
Dim a(1 To 10) As Integer, b(1 To 10) As Integer

Private Sub Command1_Click( )

    Dim i As Integer, time As Integer, k As Integer

    Dim c(1 To 20) As Integer, nc As Integer

    c(1)=a(1) ：nc= 1

   For i=1 To 9     '删除起点重复数据后添加到数组c

        If a(i)<>a(i+1) Then

            nc=nc+1



        End If

    Next i

    For i=1 To 10     '删除终点重复数据后添加到数组c

        k= nc

        Do While b(i) < c(k)

          k=k- 1

        Loop

        If Then     '非重复数据(新停靠楼层)添加到数组c

            For j=nc To k+1 Step -1

                c(j+1)=c(j)

            Next j

          nc=nc+1

          c(j+1)=b(i)

      End If

    Next i

    time=(c(nc)-c(1)) *3+nc*8

    Text1. Text="总时间--"+Str( time)+ "秒"

End Sub

Private Sub Form_ Load(     )

    '生成10批入的起止楼层，分别给数组a和b，并在列表框list1输出,代码略。

   For i=1 To 9

        For j=10 To i+1 Step -1

            If a(j)<a(j-1)Or Then

              t=a(j) : a(j)=a(j-1) : a(j-1)=t

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

            End If

        Next j

  Next i

   For i=1 To 10

        List2. AddItem Str(a(i))+Str(b(i))

  Next i

End Sub

查看解析
15、小王基于选择排序算法编写了一个VB程序，功能如下：在文本框Text1中显示排序前的数据，单击“排序”按钮，在文本框Text2中显示剔除重复数据后的升序排序结果。程序运行界面如图所示。

实现上述功能的VB代码如下，请回答下列问题：

Const n= 10

Dim a(1 To n) As Integer

Private Sub Form_ load( )

'数组初始化，生成1~20之间的随机整数并赋值给数组a，代码略

End Sub

Private Sub Cmd1_Click()

    Dim i As Integer, j As Integer, t As Integer

    Dim bottom As Integer

    bottom= n

    For i=1 To bottom-1

        For j= bottom To i+1 Step -1

            If Then   '①改错

                t=a(j) : a(j)=a(i) : a(i)=t

            ElselIf a(j)=a(i) Then

                      '②填空

                bottom= bottom- 1

            End If

        Next j

    Next i

    Text2. Text=" "

   For i=1 To bottom

        Text2. Text= Text2. Text+Str(a(i))

    Next i

End Sub

(1)、程序窗体中“排序”按钮的对象名是。

(2)、程序代码中，加框处①有错，请改正；

(3)、为实现上述功能，请在加框处②填入合适的代码：

(4)、要想生成范围是1~20的随机整数，VB表达式是。

查看解析
16、小李针对各城市的宜居状况做了一项调查，统计情况见下表。请回答下列问题：

(1)、如图a所示，求N列的综合得分时，先在N3单元格中输入公式“= SUM(D3：M3)”，然后将该公式复制粘贴到N15单元格，则该单元格式中的公式为。

(2)、小李利用单元格中的数据建立了一张各项指标的得分情况。如图b所示，则该图表的数据区域为。

(3)、如图b所示，该图表系列产生在(选填：行/列)。

(4)、若要按“空气质量”对这些城市进行降序排名，则需要选择的数据区域是。

查看解析
17、有如下VB程序段：
For i=1 To 6

    If i Mod 2<>0 Then

        If a(i) Mod 10>5 Then

            a(i)=a(i) \ 10

        Else

            a(i)=a(i) Mod 10

        End If

    Else

        a(i)=a(i- 1)+1

   End If

Next i

程序运行后a(1)到a(6)的值分别是2，3，4，5，0，1，则a(1)到a(6)各元素的初始值可能是(     )

A、26，1，4，2，8，3 B、12，1，14，2，11，3 C、15，1，2，3，4，5 D、29，1，40，2，3，30

查看解析
18、有如下程序段：
For i=1 To 2

    For j=5 To i+1 Step-1

    If a(j)<a(j-1) Then

        t=a(j) : a(j)=a(j-1) : a(j- 1)=t

    End If

Next j

Next i

数组元素a(1)到a(5)的值依次为“95，88，66，80，75”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为(     )

A、66，75，95，88， 80 B、66，75，80，95，88 C、95，88，66，80，75 D、95，88，80，75，66

查看解析
19、有如下VB程序段：
n=0

Key = Val(Text1. Text)

i = 1 : j= 10 : f= False

Do While i<= j And f = False

    n=n+1

    m=(i+j+1)\2

    If a(m)=Key Then f=True

    If a(m)>Key Then j=m-1 Else i=m+1

Loop

Text1. Text = Str(n)

数组元素a(1)到a(10)的值依次为“14，17，30，42，55，69，80，83，88，90”，执行该程序段，输入key的值为a(1)到a(10)中的某一个值，文本框Text2中显示的值为3，则key位可能是(     )

A、14 B、55 C、69 D、88

查看解析
20、下列关于数列查找说法，正确的是（）

A、使用对分查找，数列中每个元素对象不能是字符串类型的数据 B、使用对分查找数列，数列中每个元素要求必须是经过排序的 C、对于规模为1000万项数的数列，不能使用顺序查找 D、使用顺序查找，只能从第1个元素依次向后进行查找

查看解析

上一页 424 425 426 427 428 下一页跳转