精品偷拍一区二区三区,亚洲精品永久 码,亚洲综合日韩精品欧美国产,亚洲国产日韩a在线亚洲

  • <center id="usuqs"></center>
  • 
    
  • vb,產(chǎn)生10個(gè)兩位隨機(jī)整數(shù),用冒泡排序法對(duì)10個(gè)數(shù)升序排列

    vb,產(chǎn)生10個(gè)兩位隨機(jī)整數(shù),用冒泡排序法對(duì)10個(gè)數(shù)升序排列
    實(shí)驗(yàn)書上的填空
    實(shí)驗(yàn)7-9
    數(shù)學(xué)人氣:906 ℃時(shí)間:2020-06-08 09:37:47
    優(yōu)質(zhì)解答
    Dim a(10) As Integer
    Dim i%,j%,t%
    Randomiz
    For i = 1 To 10
    a(i) = Int(Rnd * 90 + 10)
    Print a(i);
    Next
    Print
    For i = 1 To 9
    For j = i + 1 To 10
    If a(i) > a(j) Then
    t = a(i)
    a(i) = a(j)
    a(j) = t
    End If
    Next
    Next
    For i = 1 To 10
    Print a(i);
    Next
    我來(lái)回答
    類似推薦
    請(qǐng)使用1024x768 IE6.0或更高版本瀏覽器瀏覽本站點(diǎn),以保證最佳閱讀效果。本頁(yè)提供作業(yè)小助手,一起搜作業(yè)以及作業(yè)好幫手最新版!
    版權(quán)所有 CopyRight © 2012-2024 作業(yè)小助手 All Rights Reserved. 手機(jī)版