За один ход с числом делается операция вида: если число не делится на 3,то вычетаем 1 а

За один ход с числом делается операция вида: если число не делится на 3,то вычетаем 1 а если делится , то делим на 3.Так из числа 39 единица получается за 5 таких ходов(имеется в виду цепочка, 39-13-12-4-3-1)
Программка должна:
-Запросить число ходов k(натуральное число,0lt;=klt;=37)
-Отыскать и вывести на экранНаименьшее естественное число, которое преобразуется в единицу за k таких ходов.
Язык программы Pascal АВС.