相关试卷

  • 1、密码作为保障信息安全的基本方法,应该(   )
    A、使用个人的出生年月作为常用密码 B、设置复杂的密码,并且定期更换 C、在任何场合都使用相同的密码 D、使用空密码
  • 2、小明妈妈换了新手机,旧手机卖给二手手机商店之前,最为合适的做法是(  )
    A、把手机卡拿掉 B、把手机里的照片删除 C、把手机里的通讯录删除 D、将手机初始化恢复成出厂设置
  • 3、若你接到自称是银行工作人员的电话,通知你的银行卡被盗用,下列做法恰当的是(   )
    A、银行卡没有丢失,不予理睬 B、在银行ATM机上按照对方的指导进行操作 C、拨打银行全国统一客服电话予以确认 D、登录网上银行并按照对方的指导进行操作
  • 4、关于计算机病毒,下列说法不正确的是(   )。
    A、病毒具有传染性 B、病毒具有可触发性 C、病毒具有潜伏性和破坏性 D、计算机病毒是计算机自动生成的错误代码。
  • 5、智慧域市中某个下水井盖了,在城市系统端会立即发出维修提示和报警,这里主要运用了通信技术。
  • 6、安装ETC苏通卡的车辆,在通过高速收费站时无需停车即可自动扣费。该服务需要一个电子标签作为车辆的身份标识。这里采用的典型技术是(     )
    A、物联网 B、蓝牙 C、虚拟现实 D、因特网
  • 7、下列关于物联网的说法错误的是(    )
    A、物联网就是物物相连的互联网 B、物联网是在互联网基础上延伸和扩展的网络 C、物联网的英文名称是“World Wide Web” D、物联网是继计算机、互联网之后,世界信息产业发展的第三次信息化浪潮
  • 8、物联网是指通过某种感知设备,把物体与互联网连接起来,进行信息交换和处理,以实现智能识别、定位、跟踪、监控和管理的网络。以下不属于物联网应用的是(    )
    A、手机远程操控家用电器 B、ETC车辆自动收费系统 C、无线鼠标控制电脑 D、扫描共享单车二维码,向云端服务器发送解请求,单车解锁成功
  • 9、物联网连接的是信息世界和(    )
    A、现实世界 B、虚拟世界 C、物理世界 D、人类世界
  • 10、下列选项中,属于信息的是(     )。
    A、校刊 B、海报 C、DVD光盘 D、CCTV播出的天气预报
  • 11、城市道路的十字路口采用电子警察摄像的方式监管车辆闯红灯的现象,首先要进行的是(      )
    A、信息处理 B、信息采集 C、信息加工 D、信息储存
  • 12、为了提高食品安全,使用物联网技术可以及时了解农产品生产、运输、存储、销售等各个环节,这其中没有使用的信息技术是(     )
    A、纳米技术 B、定位技术 C、网络技术 D、遥感技术
  • 13、以下关于物联网描述不恰当的是(     )
    A、物联网即“万物相连的互联网”,物联网是在互联网基础上延伸和扩展的网络 B、物联网推广使用的主要目的是让人们的生活更加轻松更加健康 C、智能家居就是物联网在家庭中的基础应用 D、物联网需要采集大量的数据,我们应积极在物联网上提交自己的全部个人数据
  • 14、如图是某学校60台计算机组建成一个局域网结构图。学校向ISP申请了账号,相关信息如下:

    IP地址:220.168.20.60

    子网掩码:255.255.255.0

    DNS地址:202.100.192.68

    (1)、该局域网访问互联网充当网关的设备是。它的WAN(外网)IP为
    (2)、计算机PC1的默认网关设置为192.168.10.1,则PC2的默认网关是。PC2的DNS地址设置为:
    (3)、计算机PC1的IP地址为192.168.10.2,计算机PC2的IP地址可以设置为 , 默认子网掩码为
  • 15、用IE浏览器上网时,在地址栏输入202.108.22.5可以访问百度网站,而输入www.baidu.com则无法访问,导致此问题的原因可能是TCP/IP协议中(   )属性配置错误。
    A、DNS服务器 B、IP地址 C、子网掩码 D、默认网关
  • 16、域名解析服务器就是(   )

    A、POP3服务 B、WWW服务 C、SMTP服务 D、DNS服务
  • 17、下列哪个 IP 地址是不合法的(   )
    A、202.100.199.8 B、254.254.254.254 C、172.16.16.16 D、192.168.258.1
  • 18、与二进制数(101110)等值的十进制数是(      )
    A、46 B、47 C、48 D、50
  • 19、IP地址125.34.202.212属于(   )IP地址
    A、A类 B、B类 C、C类 D、D类
  • 20、“一笔画游戏”是指图上的所有边有且仅经过一次刚好将整个图描完。一般图由点和边组成,一条边连接两个点,一个点可以连接多条边。若某点连接的边数是奇数,则被称为奇点,反之称为偶点。如图a图中A点连接的边有3条,A点就是奇点,B点连接的边为2条,B点就是偶点。如果图中存在0个奇点或2个奇点,则能被一笔画成,否则就不能。如图a图中奇点数为2个,可以一笔画成;如b图中奇点数为4个,不可以一笔画成。

    现有VB程序用于判断某图能否一笔画成,若能,则通过穷举边的顺序来找到一种合法的路径。如c图有三条边,第1条由①②相连,第2条由④③相连,第3条由③②相连,若边的顺序231就是其中一种合法的边的顺序,代表先描第2条边,再描第3边,最后描第1条边,对应的路径④→③→②→①。在程序运行过程中,在文本框Text1中输入点的个数n,表示图中有n个点编号为1~n。在文本框Text2中输入若干点的编号,每两个点代表一条边(保证输入为偶数个点),以“,”开头,点击“一笔画”按钮Command1后,在Label3中输出结果,在若能一笔画成,则输出一条路径,否则,提示“无法一笔画!”。程序界面如c图:

    c图

    (1)、在Text1中输入“4”,在Text2中输入“,2,3,1,2,2,4”。则Label3输出结果是
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Dim n As Integer, t As Integer, m As Integer, I As Integer, j As Integer

    Dim ans As Integer, u As Integer, st As Integer, p As Long

    Dim a(21) As Integer, b(11) As Integer, f(11) As Integer

    Dim c(11)As Integer       '用于存储构成一笔画各边的序号

    Dim s As String, ss As String

    Private Sub Command1_Click()

        n= Val(Text1.Text)

        s= Text2.Text: t= 0

        For j= 1 To Len(s)

            ch = Mid(s, j, 1)

            If ch = "," Then

                b(a(t)) = b(a(t)+1

                t=t+1

                a(t)= 0

            Else

                a(t)= a(t)*10 + Val(ch)

            End If

        Next j

        : m=t\2: ans=0

        st= 1

        For i= 1 To n

            If b(i) Mod 2=1 Then ans = ans+ 1: st=i

        Next i

        If ans=0 Or ans=2 Then

            For p=1 To m^m    '穷举边的顺序

                If try(p) Then

                    u= st: ss = Str(u)

                    For j=1 To m

                        If (a(c(j)* 2)<>u) And (a(c(j)*2-1)<>u) Then Exit For

                        If Then u= a(c(j)*2- 1) Else u=a(c(j)*2)

                        ss=ss +"->"+ Str(u)

                    Next j

                    If j> m Then Exit For

                End If

            Next p

        Else

            ss="无法一笔画!"

        End If

        Label3.Caption=ss

    End Sub

    Function try(x As Long) As Boolean      '生成边的访问顺序,并判断有无重复的边

        Dim k As Integer, y As Long

        y=x

        For k=1 To m

            c(k)=y Mod m+1: y-y\m

            If f(c(k)) = x Then Exit For

           

        Next k

        If k> m Then try=True Else try = False

    End Function

上一页 843 844 845 846 847 下一页 跳转