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

2011年浙江省高中信息技術(shù)會(huì)考試卷(13)

發(fā)布:2024/12/18 9:30:3

一、選題題(算法)

  • 1.將數(shù)學(xué)表達(dá)式
    1
    2
    sinxcosx(x的單位:弧度)寫成Visual Basic表達(dá)式,正確的是( ?。?/h2>

    組卷:7引用:2難度:0.9
  • 2.在Visual Basic中,下列能作為變量名的是( ?。?/h2>

    組卷:2引用:2難度:0.9
  • 3.在Visual Basic中,用變量存儲(chǔ)560位學(xué)生的身高數(shù)據(jù)(如:1.76),下列最合適的變量說(shuō)明是(  )

    組卷:8引用:3難度:0.9

二、填空部分

  • 10.角谷猜想。對(duì)任意一個(gè)大于1的正整數(shù)n,進(jìn)行如下運(yùn)算:若n是奇數(shù)時(shí),n的值替換為3n+1,若n是偶數(shù)時(shí),n的值替換為n/2;重復(fù)以上運(yùn)算,n最終變?yōu)?.菁優(yōu)網(wǎng)
    下面程序用于驗(yàn)證角谷猜想,程序運(yùn)行界面如圖1所示。在文本框Text1中輸入一個(gè)正整數(shù),單擊“驗(yàn)證”按鈕Command1,在列表框List1中輸出每一步的運(yùn)算過(guò)程。
    解決此問(wèn)題的算法流程圖如圖2所示:
    程序代碼如下:
    Private Sub Command1_Click (  )
    Dim n As Single,i As Integer
    n=Val(Text1.Text)
    List1.Clear'清除列表框List1中的內(nèi)容
    If Int(n)<>n Or n<=1Then
    List1.AddItem“請(qǐng)輸入大于1的正整數(shù)!“
    Else
    i=0
    Do While
     

    If n Mod 2=0Then
    n=
     

    Else
    n=n*3+1
    End If
    i=i+1
    List1.AddItem Str(i)+““+Str(n)
    Loop
    End If
    End Sub
    (1)解決此問(wèn)題的算法是
     
    。(填:解析算法/對(duì)分查找)
    (2)在程序①和②橫線處,填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式,把程序補(bǔ)充完整:
    程序中①橫線處應(yīng)填入
     
    。
    程序中②橫線處應(yīng)填入
     
    。

    組卷:0引用:1難度:0.1

三、操作題

  • 菁優(yōu)網(wǎng)11.打開考生文件夾下“VB”文件夾中的“test.jye.ai”,該VB程序的功能是:?jiǎn)螕簟伴_始”按鈕Command1,小熊開始“滑冰”;單擊“停止”按鈕Command2,“滑冰”動(dòng)作停止;單擊“結(jié)束”按鈕Command3,結(jié)束并退出程序。程序運(yùn)行界面如圖所示:
    完成以下操作:
    (1)將命令按鈕Command3的Caption屬性值設(shè)置為“結(jié)束”;
    (2)為“停止”按鈕Command2添加Click事件過(guò)程,并將“VB”文件夾下“code.jye.ai”文件中的所有代碼復(fù)制到該事件過(guò)程中。調(diào)試程序正確,并保存窗體文件test。frm和工程文件test。vbp。

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