元素的陣列。隨機所有元素並排序vb編寫

2021-03-19 18:34:23 字數 1076 閱讀 8980

1樓:匿名使用者

private sub ***mand1_click()randomize

dim a(20) as integer

for i = 1 to 20

a(i) = int(rnd * 101 + 100)print a(i);

next i

for i = 1 to 20

for j = 1 to 20 - i

if a(j) > a(j + 1) thentemp = a(j + 1)

a(j + 1) = a(j)

a(j) = temp

end if

next j

next i

print

for i = 1 to 20

print a(i);

next i

end sub

vb程式設計題,定義一下有20個元素的一維陣列,使用inputbox函式為陣列中的所有元素賦值,並顯示

2樓:匿名使用者

dim a(1 to 20) as integerprivate sub form_click()mx = a(1)

mn = a(1)

for i = 1 to 20

a(i) = inputbox("輸入一來個數自值", "輸入")if a(i) > mx then mx = a(i)if a(i) < mn then mn = a(i)next

print "最大值是

" & mx & ",最小值是" & mnend sub

3樓:匿名使用者

dim a(20)

dim i,j,k

for i=0 to 19

a(i) = inputbox("輸入第

baidu"& i + 1 &"個資料

:zhi")

if i=0 or j>a(i) thenj = a(i)

end if

if i=0 or k小

dao="& j &",最回

大答="& k )

C語言 給陣列中的元素賦值

好像沒有什麼直接的辦法,只有使用迴圈語句來判斷最後一個出現的非0值為最後一個元素,也就是說如果你初始化為1,2,3,0,4,5這樣有辦法判斷,但若初始化為1,2,0,3,0,0就沒辦法判斷了,只能判斷到3,因為3是最後一個非0值。因為系統預設會把其他部分都初始化為0,所以沒有辦法判斷 沒有賦值的元素...

c語言程式設計 輸入元素的陣列,輸出這個陣列的最大值,最

include int main for i 0 i 5 i arv sum 10.0 for i 0 i 5 i for i 0 i 5 i printf n printf 最大值為 2f 最小值為 2f a 0 a 4 printf n printf 2f n arv printf n retu...

c語言中陣列元素互換的問題,C語言中陣列元素互換的問題

當index為0時,bai陣列中下標為du0的和下標為4 0的元素交換,也zhi就是第一個和最後一dao個交換,回1,5 交換 當index為1時,答陣列中下標為1的和下標為4 1的元素交換,也就是第二個和倒數第二個交換,2,4 交換 因為此陣列元素的個數為奇數個,所以,最中間那個沒有必要交換,所以...