получить число с минимальным расстоянием между всеми числами в массиве [vb] - PullRequest
0 голосов
/ 28 сентября 2018

У меня есть массив с числами, я хочу получить десять чисел с минимальным расстоянием до всех элементов в массиве.Я хочу получить вывод в массиве с десятью числами и расстоянием до всех элементов.

Мой исходный код:

    Dim lowest As Integer = myArray(0)
    Dim biggest As Integer = myArray(myArray.Length - 1)
    For i = lowest To biggest
        For x = 0 To myArray.Length - 1 'arrays in 
            distance(i) = (myArray(x + 1) - myArray())
        Next
    Next
    ListBox1.Items.Clear()
    For x = 0 To distance.Length - 1
        ListBox1.Items.Add(distance(x))
    Next
...