Разбор добавил Джафар Исхоков

Применим алгоритм Флойда. Храним в массиве a[60][60] матрицу смежности ориентированного графа. Если 
a[i][j] = -1 то значит ребра нету и присвоим ему значение бесконечности. Так как бесконечность не
можно изобразить в программе то вместо него возьмем какое-то большое число Например 100000.
 Теперь запустим алгоритм Флойда. Для тех кто не знает то она выглядит таким образом 
for k := 1 to n do
     for i := 1 to n do
       for j := 1 to n do
         if a[i,j] > a[i,k] + a[k,j] then
           a[i,j] := a[i,k] + a[k,j];
где n – число вершин в графе.    После этой процедуры в элементе a[i,j] будет храниться минимальный
 путь от вершины i до вершины j.  Теперь найдем максимум из этого массива которое не равно 
бесконечности (т.е 100000). Желаю удачи ; )