Эйлеров путь, нахождение пути Опции

[setare]

Здравствуйте! У меня возникла проблемма в задаче нахождения Эйлерова пути между словами. Задача состоит в следующем: есть N слов из букв латинского альфавита. Сложить из них цепочку и найти эйлеров путь, при чем конец последующего слова должен совпадать с началом предыдущего.
Кое-что я написала, но не пойму почему мне постоянно компилятор дает ошибку-переполнение стэка, когда у меня нет рекурсии. Что делать? Спасибо! Файл я вложу, потому что он состоит из 200 строчек, и я не думаю, что можно просто его написать на экране.

[setare]

Отвечаю: Мне нужно с использованием кода процедуры findeiler (который нам выдал препод) написать программу. То что я как-то сделала. После тестирования она мне выдает неправильный результат. И мой конкретный вопрос: Почему? Мне хочется узнать где я ошиблась. Вот и все.Спасибо!