Нахождение минимума в массиве - 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)

Оцени полезность:

6   голосов , оценка 3.667 из 5
Похожие ответы