1樓：匿名使用者
更好的辦法是排序，先把數字在陣列中原來的位置記錄下來，然後排序後找到最大、最小數，輸出結果，排序大概這麼寫：
for i = min to ubound(vimt) - 1for j = i + 1 to ubound(vimt)redim seraim(i)
if vimt(i) > vimt(j) then '這個語句是以小到大排序，陣列的第一個就是最小數
if vimt(i) < vimt(j) then '這個語句是以大到小排序，陣列的第一個就是最大數
'注意上面的二個語句只能用一個！！
num = vimt(i)
vimt(i) = vimt(j)
vimt(j) = num
end if
有疑問可以追問
2樓：
max=0
min=32767
編寫一個程式，輸入任意10個數字，從中找出最大和最小的數，並給出最大和最小的書在陣列中位置
3樓：巨集金生貫女
fori=1
to10
改成fori=
0to9試一下
汗……有option
base
1啊……
看出來了，是這樣子的，因為你在輸入之前就定義了min=s(1)此時，s(1)=0，所以之後只要你輸入的正數就不會比0小了，應該將min定義成一個大數，比如使成績的話，min=100這樣就不會錯了
vb程式設計 用for迴圈向一維陣列中輸入10個數,找出其中的最大值和最小值,並且交換最大值
寫一個程式，從鍵盤上輸入10個數，找出其中最大和最小的數並輸出，用while和do while兩種
4樓：有愛的靜靜
#include
int main()
i=0;
while(i<10)
j++;
}i++;
}printf("max is %d,min is %d\n",a[0],a[10]);}
兄弟，採納吧，特意為你寫的這個程式。
編寫一個程式，輸入任意10個數字，從中找出最大和最小的數，並給出最大和最小的書在陣列中位置
5樓：哀濃水愜
fori=1
to10
改成fori=
0to9試一下
汗……有option
base
1啊……
看出來了，是這樣子的，因為你在輸入之前就定義了min=s(1)此時，s(1)=0，所以之後只要你輸入的正數就不會比0小了，應該將min定義成一個大數，比如使成績的話，min=100這樣就不會錯了
用vb編寫評委打分的程序，用vb 編寫一個評委打分的程式
樓主 你是不是沈師的 一個關於評委打分的vb程式。求助 vb歌手大賽評分程式10位評委除去一個最高分和一個最低分計算平均數 設滿分為10 前面的可以改嗎？很明顯需要宣告一個陣列。用vb做一個評分程式 iftext1.text 123 thentext2.text 159 elseiftext1.te...
用c編寫輸入任意個數字排倒序的程式
你把輸入 的數字放在textbox裡面 string s textbox1.text int a new int s.length for int i 0 i裡。array.sort a array.reverse a 倒序 將輸入的數字放到一個陣列中，用陣列自帶的排序方法排序。datatable ...
編寫VB程式編寫Sub過程把任意十進位制數N分別轉換成
private function dectopoint value as long,flag as long as string dim c as long dim r as long c value if flag 16 then dectopoint hex c exit function en...