Решить задачу на Pascal(Графы)

Напишите программу, реализующую нахождение длины кратчайшего пути от одной вершины – источника ко всем остальным вершинам графа с применением метода поиска в ширину. Используйте представление графа в виде матрицы смежности.