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

2017年江蘇省信息技術(shù)學(xué)業(yè)水平試卷(11)

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

一、操作題(每題10分,8題共80分)

  • 1.打開文件“考生文件夾\863\細(xì)胞分裂.vbp”,完善程序?qū)崿F(xiàn)如下功能并保存:
    有一種細(xì)胞每3分鐘分裂一次,每次分裂時(shí)每個(gè)細(xì)胞分裂成2個(gè),30分鐘后有2048個(gè)細(xì)胞.問開始時(shí)有多少個(gè)細(xì)胞?
    Private Sub cmdDivision_Click (  )
    Dim f(10)As Integer'30分鐘共分裂10次
    Dim i As Integer
    f(10)=①
    For i=9To 0Step ②
    f(i)=f(i+1)/2
    Next i
    Print ③
    End Sub.

    組卷:8引用:1難度:0.7
  • 2.打開文件“考生文件夾\853\工程1.vbp”,完善程序?qū)崿F(xiàn)如下功能并保存:
    在數(shù)組中輸入5個(gè)整數(shù),找出最大數(shù)(max)和最小數(shù)(min),并分別在Label1和Label2中顯示.
    Private Sub Command1_Click ( ?。?br />Dim x(5)As Integer,i As Integer
    Dim max As Integer,min As Integer
    For i=1To 5
    ①=InputBox(“輸入一個(gè)數(shù)“)
    Next i
    max=②
    min=x(1)
    For i=2To 5
    If x(i)>max Then max=x(i)
    If x(i)<min Then ③=x(i)
    Next i
    Label1.Caption=Str(max)
    Label2.Caption=Str(min)
    End Sub.

    組卷:7引用:1難度:0.5

一、操作題(每題10分,8題共80分)

  • 7.密碼的原理是將“明文”中的每個(gè)字符用另外一個(gè)字符替換,這樣就形成“密文”.如果將數(shù)字進(jìn)行加密,其對(duì)應(yīng)關(guān)系如下所示:
    明文:0123456789  密文:9876543210
    打開文件“Z:\1\工程1.vbp”,完善程序,使實(shí)現(xiàn)以下功能后保存:
    若在文本框text1中輸入待加密的數(shù)字,單擊“command1命令按鈕”后,在文本框text2中輸出密文.(數(shù)值型與字符型不能進(jìn)行數(shù)學(xué)運(yùn)算)
    Private Sub Command1_Click ( ?。?br />Dim x As String,y As String
    Dim i As Integer
    Dim temp1As String,temp2As String
    x=Text1.Text
    y=““
    For i=1To ①(Text1.Text)
    temp1=Mid(x,i,1)
    temp2=②
    y=y+temp2
    Next i
    Text2.Text=③
    End Sub.

    組卷:8引用:2難度:0.5
  • 8.打開文件“考生文件夾\9\工程1.vbp”,完善Command1_Click事件代碼并保存.
    實(shí)現(xiàn)功能:輸入10個(gè)數(shù),存放在數(shù)組中,并按輸入的逆序輸出在窗體上.
    Private Sub Command1_Click (  )
    Dim s(9)As Single
    For i=0To 9
    ①=Val(InputBox(“請(qǐng)輸入一個(gè)數(shù)“))
    Next i
    For i=9To 0Step ②
    Print ③
    Next i
    End Sub.

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