求一个数组中最小数及其位置

来源：百度知道编辑：UC知道时间：2024/07/04 18:59:53

要求（1）单击窗体，弹出输入数据对话框，对数组进行初始化（2）输入结束，在窗体中显示原数据内容，最小数及位置。用VB知识，用数组，谢了

Dim x(4) As Integer
For i = 0 To 4
x(i) = Val(InputBox("Enter Data" & i))
Print x(i)
Next

Min = x(0)
Max = x(0)

For i = 1 To 4
If x(i) < Min Then Min = x(i)
If x(i) > Max Then Max = x(i)
Next

Print "最大数="; Max & vbCrLf & "最小数 ="; Min
Print "最大数与最小数差值="; Max - Min

换个马甲上来问个问题,都不知道你还记不记得刚刚注册的密码,还能指望你选出最佳答案,回答这样的问题,简直是浪费时间!!

对试用期一级的问题,没有兴趣,路过....

vb编程题：求数组中的最小数及其位置编写一个子过程，求一维数组中最小的数用C语言数组求6个数（用户输入）中的最小及其位置 c#中怎么样实现数组的输出？找出数组中最小数输出？？求！在一个有8个整数（18，27，7，36，14，3，89，62）的数组中找出最小的数及其下标。输若干数放一数组中（以输入－1为结束），去一最高，一最低求平均值，输大于平均值的数及其原位置． java编程在数组（18，27，7，36，14，3，89，62）中找出最小的数及其下标。求2维数组中这样元素的位置，它在行上是最小，在列上也是最小(注：它未必是整个数组中最小元素)。 "求数组中大小相差最小的两个数"的高效算法用VFP作一个程序设计：求数组元素中的最大，最小以及他们的位置．