Определить три точки, являющиеся вершинами треугольника, для которого разность точек вне его и внутри является - VB

Формулировка задачи:

Умоляю,помогите кто чем может(( Не получается решить задачу в visual basic: В одномерном массиве с четным количеством элементов (2N) находятся координаты N точек плоскости. Они располагаются в следующем порядке: x1, у1, х2, у2, x3, y3 и т.д. Определить три точки, являющиеся вершинами треугольника, для которого разность точек вне его и внутри является минимальной. Нет,я не лентяйка, которая сидит и ждет решения на блюдечке и не обращалась бы ни к кому, если бы не такая ситуация(курсовая работа готова,кроме этой задачи,сижу над ней неделю и не выходит ничего,а сроки сдачи уже подходят).Пожалуйста,Если вы что-то знаете по этому поводу,прошу,помогите.

Решение задачи: «Определить три точки, являющиеся вершинами треугольника, для которого разность точек вне его и внутри является»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Кнопка2_Click() 
Dim a() As Integer, i As Integer, j As Integer, K As Integer, N As Integer
N = InputBox(" введите кол-во элементов ") 
m = 2 * N 
 
ReDim a(m) 
Randomize 
str = " " 
For i = 1 To m 
a(i) = Int(10 * Rnd + 1) + Int(-10 * Rnd + 1) 
str = str & a(i) & " " 
Next 
MsgBox ("Элементы массива : " & str)