Алгоритм поиска кратной медианы графа (p=2)

Помогите закончить программу
там где кнопка вычислить медиану графа, должна рассчитывать "Алгоритм поиска кратной медианы графа (p=2)"
Программа.rar

0

Помогите найти
Алгоритм поиска кратной медианы графа (p=2)

Добавлено через 1 час 18 минут
вот ест в математической форме, но я не могу перевести это в basik
1. Получим матрицу длинн кратчайших путей для заданного графа. Применим для этого алгоритм Флойда
На основании исходных данных формируем матрицу длин кратчайших дуг D0, каждый элемент которой равен длине кратчайщей дуги между вершинами i и j. Если такой дуги нет, положим значение элемента равным ∞.

D0= 5 4 6 4
5 2 2 4
0 1 9 4
2 7 8 0

На основании матрицы D0, вычислим последовательно все элементы матрицы D1. Для этого мы используем рекуррентное соотношение di,j1=min{ di,10+ d1,j0; di,j0}.
d1,11=min{d1,10+d1,10d1,10}=min{5+5; 5}=5
d1,21=min{d1,10+d1,20d1,20}=min{5+4; 4}=4
d1,31=min{d1,10+d1,30d1,30}=min{5+6; 6}=6
d1,41=min{d1,10+d1,40d1,40}=min{5+4; 4}=4
d2,11=min{d2,10+d1,10d2,10}=min{5+5; 5}=5
d2,21=min{d2,10+d1,20d2,20}=min{5+4; 2}=2
d2,31=min{d2,10+d1,30d2,30}=min{5+6; 2}=2
d2,41=min{d2,10+d1,40d2,40}=min{5+4; 4}=4
d3,11=min{d3,10+d1,10d3,10}=min{0+5; 0}=0
d3,21=min{d3,10+d1,20d3,20}=min{0+4; 1}=1
d3,31=min{d3,10+d1,30d3,30}=min{0+6; 9}=6
d3,41=min{d3,10+d1,40d3,40}=min{0+4; 4}=4
d4,11=min{d4,10+d1,10d4,10}=min{2+5; 2}=2
d4,21=min{d4,10+d1,20d4,20}=min{2+4; 7}=6
d4,31=min{d4,10+d1,30d4,30}=min{2+6; 8}=8
d4,41=min{d4,10+d1,40d4,40}=min{2+4; 0}=0
Представим матрицу D1, включив в нее рассчитанные элементы.

D1= 5 4 6 4
5 2 2 4
0 1 6 4
2 6 8 0

На основании матрицы D1, вычислим последовательно все элементы матрицы D2. Для этого мы используем рекуррентное соотношение di,j2=min{ di,21+ d2,j1; di,j1}.
d1,12=min{d1,21+d2,11d1,11}=min{4+5; 5}=5
d1,22=min{d1,21+d2,21d1,21}=min{4+2; 4}=4
d1,32=min{d1,21+d2,31d1,31}=min{4+2; 6}=6
d1,42=min{d1,21+d2,41d1,41}=min{4+4; 4}=4
d2,12=min{d2,21+d2,11d2,11}=min{2+5; 5}=5
d2,22=min{d2,21+d2,21d2,21}=min{2+2; 2}=2
d2,32=min{d2,21+d2,31d2,31}=min{2+2; 2}=2
d2,42=min{d2,21+d2,41d2,41}=min{2+4; 4}=4
d3,12=min{d3,21+d2,11d3,11}=min{1+5; 0}=0
d3,22=min{d3,21+d2,21d3,21}=min{1+2; 1}=1
d3,32=min{d3,21+d2,31d3,31}=min{1+2; 6}=3
d3,42=min{d3,21+d2,41d3,41}=min{1+4; 4}=4
d4,12=min{d4,21+d2,11d4,11}=min{6+5; 2}=2
d4,22=min{d4,21+d2,21d4,21}=min{6+2; 6}=6
d4,32=min{d4,21+d2,31d4,31}=min{6+2; 8}=8
d4,42=min{d4,21+d2,41d4,41}=min{6+4; 0}=0
Представим матрицу D2, включив в нее рассчитанные элементы.

D2= 5 4 6 4
5 2 2 4
0 1 3 4
2 6 8 0

На основании матрицы D2, вычислим последовательно все элементы матрицы D3. Для этого мы используем рекуррентное соотношение di,j3=min{ di,32+ d3,j2; di,j2}.
d1,13=min{d1,32+d3,12d1,12}=min{6+0; 5}=5
d1,23=min{d1,32+d3,22d1,22}=min{6+1; 4}=4
d1,33=min{d1,32+d3,32d1,32}=min{6+3; 6}=6
d1,43=min{d1,32+d3,42d1,42}=min{6+4; 4}=4
d2,13=min{d2,32+d3,12d2,12}=min{2+0; 5}=2
d2,23=min{d2,32+d3,22d2,22}=min{2+1; 2}=2
d2,33=min{d2,32+d3,32d2,32}=min{2+3; 2}=2
d2,43=min{d2,32+d3,42d2,42}=min{2+4; 4}=4
d3,13=min{d3,32+d3,12d3,12}=min{3+0; 0}=0
d3,23=min{d3,32+d3,22d3,22}=min{3+1; 1}=1
d3,33=min{d3,32+d3,32d3,32}=min{3+3; 3}=3
d3,43=min{d3,32+d3,42d3,42}=min{3+4; 4}=4
d4,13=min{d4,32+d3,12d4,12}=min{8+0; 2}=2
d4,23=min{d4,32+d3,22d4,22}=min{8+1; 6}=6
d4,33=min{d4,32+d3,32d4,32}=min{8+3; 8}=8
d4,43=min{d4,32+d3,42d4,42}=min{8+4; 0}=0
Представим матрицу D3, включив в нее рассчитанные элементы.

D3= 5 4 6 4
2 2 2 4
0 1 3 4
2 6 8 0

На основании матрицы D3, вычислим последовательно все элементы матрицы D4. Для этого мы используем рекуррентное соотношение di,j4=min{ di,43+ d4,j3; di,j3}.
d1,14=min{d1,43+d4,13d1,13}=min{4+2; 5}=5
d1,24=min{d1,43+d4,23d1,23}=min{4+6; 4}=4
d1,34=min{d1,43+d4,33d1,33}=min{4+8; 6}=6
d1,44=min{d1,43+d4,43d1,43}=min{4+0; 4}=4
d2,14=min{d2,43+d4,13d2,13}=min{4+2; 2}=2
d2,24=min{d2,43+d4,23d2,23}=min{4+6; 2}=2
d2,34=min{d2,43+d4,33d2,33}=min{4+8; 2}=2
d2,44=min{d2,43+d4,43d2,43}=min{4+0; 4}=4
d3,14=min{d3,43+d4,13d3,13}=min{4+2; 0}=0
d3,24=min{d3,43+d4,23d3,23}=min{4+6; 1}=1
d3,34=min{d3,43+d4,33d3,33}=min{4+8; 3}=3
d3,44=min{d3,43+d4,43d3,43}=min{4+0; 4}=4
d4,14=min{d4,43+d4,13d4,13}=min{0+2; 2}=2
d4,24=min{d4,43+d4,23d4,23}=min{0+6; 6}=6
d4,34=min{d4,43+d4,33d4,33}=min{0+8; 8}=8
d4,44=min{d4,43+d4,43d4,43}=min{0+0; 0}=0
Представим матрицу D4, включив в нее рассчитанные элементы.

D4= 5 4 6 4
2 2 2 4
0 1 3 4
2 6 8 0

В результате, нами получена матрица длин кратчайших путей между каждой парой вершин графа. Ниже представлена таблица путей. Каждый элемент Cij таблицы, это путь из вершины i в вершину j:
Таблица путей

1 2 3 4
1 - d1-2=1-2 d1-3=1-3 d1-4=1-4
2 d2-1=2-3-1 - d2-3=2-3 d2-4=2-4
3 d3-1=3-1 d3-2=3-2 - d3-4=3-4
4 d4-1=4-1 d4-2=4-1-2 d4-3=4-3 -

2. Поиск медианы

Основываясь на полученой нами матрице длин кратчайших путей, найдем CВВ(i) для каждой вершины графа
CВВ(i)=Σd(i, j).

CВВ(1)==Σjd(1, j)=19
CВВ(2)==Σjd(2, j)=10
CВВ(3)==Σjd(3, j)=8
CВВ(4)==Σjd(4, j)=16
Медианой графа является такая вершина x, для которой СВВ(x)=min{СВВ(i)}. Минимальное значение имеет СВВ(3)=8, а это значит, что вершина 3 является медианой графа.

Добавлено через 8 часов 47 минут
у меня в C++ код есть, но надо в Basic, я не знаю как

0