Щербаков Д.В. */
/***************************************** ******************/
# include "my.h" vyvod (int n, int gr [NMAX] [NMAX])
{int i, j; // Змінні циклу (i = 0; i
{for (j = 0; j // Висновок матриці суміжності графа gr
}
}
Додаток 5. Текст програми модуля poisk
# include "my.h"
int poisk (int gr [NMAX] [NMAX], int n, int A, int B)
{ int st [NMAX +1]; // Стекi, j; // Змінні циклу jp; // Стовпець з якою ведеться пошук нової вершини
int l; // Змінна циклу
int vp [NMAX]; // Вектор відвідувань
int kolput = 0; // Обнулення кількості шляхів
int m [NMAX]; // Масив, який заносить шлях в стек
int flag = 0; // Обнулення ознаки вершини
int uk = 0; // Обнулення покажчика стека
for (i = 0; i
{vp [i] = 0; m [i] = 0;} // Обнулення масиву і вектора відвідувань
st [0] = A; // Нульовий елемент стека дорівнює вершині A
vp [A] = 1; // Відзначаємо A елемент відвіданим
i = 0;
jp = 0;
do
{i = st [uk]; // Присвоєння uk елемента стека рядку i
j = jp; // Присвоєння колонки j номер шпальти jp
while (j
{uk + +; [uk] = j; // Присвоєння uk елементу стека числа j = 0;
vp [j] = 1; // Відзначили відвіданою
if (j == B) // Якщо j одно кінцевої вершині B
{for (l = 0; l <= uk; l + +)
m [st [l]] + +; // Заносимо стек в масив
kolput + +; // Збільшуємо на 1 кількість шляхів
jp = st [uk]; vp [jp] = 0; // Повертаємося
