Помогите решить задачу в Pascal
 

Здравствуйте! Если есть у кого нибудь свободное время или желание помочь студенту,будьте любезны помочь в решении задачи языке Паскаль.


В графе заданной матрицей весов для данной вершины найти и вывести на экран все смежные ей вершины и все инцидентные ей ребра.


Хотелось бы получить помощь.