Найти сумму цифр в десятичной записи трехзначного натурального числа - Prolog
Формулировка задачи:
Найти сумму цифр в десятичной записи трехзначного натурального числа.
Решение задачи: «Найти сумму цифр в десятичной записи трехзначного натурального числа»
textual
Листинг программы
predicates sum_dig(integer,integer) clauses sum_dig(N,N) :- N<10, !. sum_dig(N,M) :- K=N div 10, P=N mod 10, sum_dig(K,Q), M=Q+P.