Нужна реализация алгоритмов дейкстры, флойда и йена в delphi и блок-схемы к ним

Предполагается, что есть заполненная матрица смежности вершин (компонент StringGrid)
1.Нужно реализовать алгоритм дейкстры из начальной вершины в конечную (задается с помощью двух SpinEdit либо просто Edit) (желательно сделать проверку на существование вводимых вершин)
Вывод в другой StringGrid в виде последовательности вершин и длины пути (длину лучше в какой-нибудь Label выводить при StringGridSelectCell) хотя можно там же, только чтобы отделялось от последовательности вершин
Блок схема этого алгоритма+комменты в коде
2. Реализовать алгоритм Флойда для поиска кратчайших путей между всеми парами вершин и вывод этих путей в StringGrid в виде последовательности вершин + длину можно туда же, только чтобы значение отделялось, что-то вроде 1,4,5,7 = 33
Блок схема этого алгоритма+комменты в коде
3. Алгоритм Йена (те же условия, что и у Дейкстры, только возможность выбрать количество путей до конечной вершины)
Блок схема этого алгоритма+комменты в коде
В 1 и 3 предусмотреть, чтобы при отсутствии пути между вершинами какой нибудь мессаджбокс всплывал, что путей не существует.

Нужно срочно, хорошо оплачу услуги
icq 597751942