試卷征集
加入會員
操作視頻

某VB程序的代碼如下：
s=“”
For i=1To 3
k=i
For j=i+1To 6
If  a（j）＜a（k） Then k=j
Next j
If  i＜＞k Then
t=a（i）：a（i）=a（k）：a（k）=t
End If
s=s+str（a（i））
Next i
Text1．Text=str（s）
數(shù)組元素從a（1）到a（6）的數(shù)據(jù)依次為“13、27、21、35、8、19”，經(jīng)過該程序“加工”后，文本框Text1中顯示的是（　?。?/h1>

【答案】A
【解答】
【點評】
聲明：本試題解析著作權屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復制發(fā)布。
發(fā)布：2024/11/7 15:30:1組卷：15引用：1難度：0.5
相似題

  • 1．有程序段如下：
    Dim a（1 To 8）As Integer
    K=8：n=8
    For i=1 To 3
        For j=i+1 To n
            If a（i）＜a（j） Then
                t=a（i）：a（i）=a（j）：a（j）=t
            End If
        Next j
        For j=n-i To i+1 Step-1
            If a（k）＞a（j） Then
                t=a（k）：a（k）=a（j）：a（j）=t
            End If
        Next j
        k=k-1
    Next i
    數(shù)組元素a（1）～a（8）中的初始值為：8，13，7，14，6，9，5，12，執(zhí)行該程序段后，數(shù)組元素a（1）～a（8）中的值將變?yōu)椋ā　。?/h2>

    發(fā)布：2024/11/13 0:0:1組卷：2引用：2難度：0.5

  • 2．有如下VB程序段：
    菁優(yōu)網(wǎng)
    執(zhí)行該程序段后，a（1）～a（6）各元素可能的值是（　　）

    發(fā)布：2024/11/9 6:30:1組卷：2引用：1難度：0.5

  • 3．小王基于冒泡排序算法編寫了一個VB程序，實現(xiàn)數(shù)據(jù)分段排序。功能如下：在文本框Text1中輸入產(chǎn)生的數(shù)據(jù)個數(shù)，單擊“產(chǎn)生原始數(shù)據(jù)”按鈕Command1，隨機產(chǎn)生若干個不重復的整數(shù)依次存儲在數(shù)組a中，并顯示在文本框Text2中。在文本框Text3中輸入每段數(shù)據(jù)的元素個數(shù)及排序的次序（0表示升序，1表示降序），數(shù)據(jù)之間用空格隔開，提取數(shù)據(jù)后，依次存儲在數(shù)組b中。單擊“排序”按鈕Command2，根據(jù)要求輸出數(shù)據(jù)排序的結果。部分運行界面如圖所示。
    菁優(yōu)網(wǎng)
    （1）若在文本框Text1中輸入“10”，文本框Text2中顯示“29 25 95 52 50 38 46 51 23 44”，在文本框Text3中輸入“3 1 4 0 3 0”，則排序后數(shù)據(jù)序列為
     
    。（單選）
    A.25 29 95 52 50 46 38 51 44 23
    B.95 29 25 38 46 50 52 23 44 51
    C.95 29 25 38 46 50 52 51 44 23
    D.23 25 29 38 44 46 50 51 52 95
    （2）請在橫線處填入合適的代碼。
    菁優(yōu)網(wǎng)

    發(fā)布：2024/11/9 20:0:2組卷：6引用：2難度：0.3
小程序二維碼
把好題分享給你的好友吧~~
APP開發(fā)者：深圳市菁優(yōu)智慧教育股份有限公司 | 應用名稱：菁優(yōu)網(wǎng) | 應用版本：4.8.2  |  隱私協(xié)議      第三方SDK     用戶服務條款廣播電視節(jié)目制作經(jīng)營許可證出版物經(jīng)營許可證網(wǎng)站地圖本網(wǎng)部分資源來源于會員上傳，除本網(wǎng)組織的資源外，版權歸原作者所有，如有侵犯版權，請立刻和本網(wǎng)聯(lián)系并提供證據(jù)，本網(wǎng)將在三個工作日內(nèi)改正