Рекурсивная реализация деления с остатком - Prolog

Формулировка задачи:

Здравствуйте прошу помочь по задачкам и ответить на вопросы Рекурсивное определение остатка от деления (mod). я сделал, но сделано ли оно через хвостовую рекурсию? мне нужно через хвостовую рекурсию

domains
i=integer
predicates
d(i,i,i)
clauses
d(X,Y,X):-X<Y,!.
d(X,Y,Z):-X1=X-Y,r(X1,Y,Z).
goal
d(101,5,X).

Решение задачи: «Рекурсивная реализация деления с остатком»

textual
                            Листинг программы 
                        
                            d(X,Y,Z):-X1=X-Y,d(X1,Y,Z).

Оцени полезность:

12 голосов , оценка 4 из 5

Похожие ответы