Нахождение минимума в массиве - Visual Basic .NET
Формулировка задачи:
имеем массив (одномерный). интересует минимальный\максимальный элементы этого массива. беда в том, что массив имеет *пустые значения*, то бишь нули, поэтому результат array.min\max не тот, который ожидается. Правда, не сложно написать ручной алгоритм поиска мин\макс в диапазоне [n1, n2]. Может быть есть варианты проще?
Решение задачи: «Нахождение минимума в массиве»
textual
Листинг программы
Dim i, max, min As Integer Dim a() As Integer = {8, 5, 6, 3, 4, 9, 7} max = 1 min = a(1) For i = 0 To a.Length - 1 Debug.WriteLine(a(i)) If a(i) > max Then max = a(i) 'находим макс. значения If a(i) < min Then min = a(i) ' находим мин. значения Next Debug.WriteLine("максисальное число массива = " & max) ' вывод Debug.WriteLine("минимальное число массива = " & min)