1樓:匿名使用者
單/雙 向冒泡
選擇插入等等
2樓:匿名使用者
排序法比如
private sub form_load()form1.show
dim a(2) as integer
a(0) = 21
a(1) = 23
a(2) = 232
for i = 0 to 2
if a(i) > a(0) then a(0) = a(i)t = a(i)
next i
print t
end sub
還有冒泡發
3樓:冰風舞雨
排序,冒泡,選擇這是最基本的了.
4樓:匿名使用者
[冒泡]:
dim n as integer
n = 8
for j = 1 to n - 1
for i = 1 to n - j
if a(i) > a(i + 1) thent = a(i)
a(i) = a(i + 1)
a(i + 1) = t
end if
next i
next j
for i = 1 to n
print a(i); " ";
next i
[選擇]:
dim a(1 to 8) as singleprivate sub command1_click()dim n as integer, p as integern = 8
for i = 1 to n - 1
p = i
for j = i + 1 to n
if a(j) < a(p) then p = jnext j
t = a(i)
a(i) = a(p)
a(p) = t
next i
for i = 1 to 8
print a(i); " ";
next i
end sub
在大自然中,比較喜歡戰鬥的動物都有哪些
震興情感匯 在自然界中好戰的動物有很多,畢竟食肉動物只有通過戰鬥才能獲取食物,食草動物也需要戰鬥來獲得交配權。但是,相對來說,以上兩種情況是動物們為了生存和繁衍才會出現的。那麼,有沒有動物是單純的好戰呢?答案是肯定的。下面我們從 海陸空 三個角度來說幾種好戰的動物。首先是水中的 鬥魚 鬥魚又稱泰國鬥...
VB中的氣泡排序在最壞情況下的比較次數是n n 1 2為什麼?什麼是最壞的情況
岔路程式緣 本題目說法有誤,冒泡法排序時,假定對n個資料排序,不管它們的順序是怎樣的,總是比較n n 1 2次,否則順序就不會排好。而冒泡法排序時,並不是每次比較都要交換資料的位置,只有在兩個數的大小跟要排的大小順序相矛盾時,才產生交換動作,所以,儘管排序時比較了n n 1 2次,一般並不會交換n ...
中國十大最著名coser,在中國比較出名的coser有哪些?
非要排的話 不行我排不了 黃山 小夢 小小白 河童 十夜 地獄蝴蝶丸 勃小黑 殺漠 kenn 嵐陵蕭蕭聲 席珍 風間雅 星河 七雪 紫堂宿 天水尋 天水三千 美歪 押切 曲豆 丁倫 小羽 竿竿 小龍女 殺殺 不分先後 乃自己看看吧 太多了吧 每個人心裡面都有自己的本命 何況 每個coser擅長的也不...