请教:VB代码:输入10个数字,然后把这10个数字由大到小排列,然后最大最小...
发布网友
发布时间：2024-10-23 15:11
我来回答
共1个回答
热心网友
时间：7分钟前
那我告诉你如何互换最大和最小值：
把10数存入数组a(0 to 9)
dim max,min，maxi,mini,temp,item
dim i as integer
max=a(0):min=a(0)
for i=0 to 9
if max<=a(i) then max=a(i):maxi=i'记录最大值和其下标
if min>=a(i) then min=a(i):mini=i'记录最小值和其下标
next
temp=a(maxi):a(maxi)=a(mini):a(mini)=temp'交换最大、最小值的位置
for each item in a
print item'输出数组中的每个元素
next
排序你会了，我就不写了！！
