試卷征集
加入會(huì)員
操作視頻
當(dāng)前位置: 試卷中心 > 試卷詳情

2016-2017學(xué)年浙江省稽陽(yáng)聯(lián)誼學(xué)校高三(上)月考信息技術(shù)試卷(10月份)

發(fā)布:2024/4/20 14:35:0

一、選擇題(共12小題,每小題2分,滿(mǎn)分24分)

  • 1.下列有關(guān)信息的說(shuō)法,不正確的是(  )
    組卷:10引用:3難度:0.9
  • 2.以下做法中,有助于提高信息安全等級(jí)的措施是(  )
    組卷:14引用:3難度:0.9
  • 3.下列應(yīng)用中,肯定沒(méi)有使用到語(yǔ)音識(shí)別技術(shù)的是( ?。?/div>
    組卷:3引用:1難度:0.9
  • 4.下列關(guān)于Access數(shù)據(jù)表的敘述中,錯(cuò)誤的是( ?。?/div>
    組卷:3引用:1難度:0.7
  • 5.某算法流程圖如圖所示,執(zhí)行這部分流程后,變量s的值及x←x+1執(zhí)行的次數(shù)分別為(  )菁優(yōu)網(wǎng)
    組卷:4引用:1難度:0.7

二、解答題(共5小題,滿(mǎn)分26分)

  • 16.數(shù)組a中有50個(gè)正整數(shù),已按升序排列.在文本框Text1中輸入一個(gè)正整數(shù)m,尋找數(shù)組a中是否有一對(duì)數(shù)的和等于給定的數(shù)m.若存在和為m的數(shù)對(duì),輸出該數(shù)對(duì)包含的兩個(gè)整數(shù),小的在前,大的在后.若有多個(gè)數(shù)對(duì)滿(mǎn)足條件,則輸出最先找到的數(shù)對(duì).若找不到符合要求的數(shù)對(duì),則輸出“沒(méi)有符合條件的數(shù)對(duì)”.小吳為此編寫(xiě)了VB程序,代碼如下,但加框處代碼有錯(cuò),請(qǐng)改正.
    Dim a(1 To 50)As Integer
    Const n=50
    Private Sub Command1_Click( ?。?br />  Dim m As Integer,left As Integer,right As Interger,mid As Integer
      Dim flag As Boolean
      flag=False:m=Val(Text1.Text)
      For i=1 To n-1
    菁優(yōu)網(wǎng)(1)
         right=n
           Do While 菁優(yōu)網(wǎng)(2)
               mid=(left+right)\2
               If a(i)+a(mid)<m Then
               left=mid+1
             ElseIf a(i)+a(mid)>m Then
                right=mid-1
               Else
                  List1.AddItem Str(a(i)) &““&Str(a(mid))
                 flag=True
              End If
            Loop
      Next i
      If Not flag Then List1.AddItem“沒(méi)有符合條件的數(shù)對(duì)“
    End Sub.
    組卷:0引用:1難度:0.3
  • 17.正整數(shù)n的階乘,在數(shù)學(xué)中定義為:n!=1×2×3×…×n,如:3!=1×2×3,現(xiàn)在輸入一個(gè)正整數(shù)n(n<=30),計(jì)算出1~n中的每一個(gè)整數(shù)的階乘的精確結(jié)果.小北按照上述要求,設(shè)計(jì)一個(gè)求前n個(gè)正整數(shù)的階乘問(wèn)題的VB程序,功能如下:在程序中他采用加法代替乘法的方法來(lái)計(jì)算階乘,如:3!=2!×3=2!+2!+2!.程序啟動(dòng)后在文本框Text1中輸入n的值,單擊“計(jì)算”按鈕Command1,在列表框List1中輸出前n個(gè)數(shù)的階乘.當(dāng)n=10時(shí),程序運(yùn)行效果如圖所示:
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)上述功能的VB程序如下請(qǐng)?jiān)跈M線(xiàn)處填入合適的代碼.
    Const maxn=80
    Dim i As Integer,j As Integer,k As Integer,n As Interger,r As Interger
    Dim a(1 To maxn)As Integer,b(1 To maxn)As Integer,s As String
    Private Sub Form_Load( ?。?br />     List1.Clear
         For i=1 To maxn
             a(i)=0
         Next i
    End Sub
    Sub array_sum(j As Integer)'該過(guò)程用于計(jì)算 j!,并將j!的精確值按位保存在數(shù)組a中
        For k=1 To j-1
          For i=1 To maxn
          r=
     

          If r>=10 Then
     
    =a(i+1)+1
          a(i)=r Mod 10
          Next i
        Next k
    End Sub
    Private Sub Command1_Click( ?。?br />    n=Val(Text1.Text)
        a(1)=1
        List1.AddItem“1!=“&Str(a(1))
        For j=2 To n
            For i=1 To maxn
                b(i)=a(i)
            Next i
            s=““
            Call array_sum(j)'該語(yǔ)句用于調(diào)用自定義過(guò)程 array_sum
            s=s+Str(j)+“!=“
            k=maxn
            Do While a(k)=0
     

            Loop
            For i=k To 1 step-1
                s=s+Str(a(i))
            Next i
            List1.AddItem s
        Next j
    End Sub.
    組卷:2引用:1難度:0.1
APP開(kāi)發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司| 應(yīng)用名稱(chēng):菁優(yōu)網(wǎng) | 應(yīng)用版本:5.0.4 |隱私協(xié)議|第三方SDK|用戶(hù)服務(wù)條款
本網(wǎng)部分資源來(lái)源于會(huì)員上傳,除本網(wǎng)組織的資源外,版權(quán)歸原作者所有,如有侵犯版權(quán),請(qǐng)立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個(gè)工作日內(nèi)改正