Решение на задача 4
summa(N1,N2,N):-summa1(N1,N2,N,0,0,[0,1,2,3,4,5,6,7,8,9],_).
summa1([],[],[],0,0,Digits,Digits).
summa1([A|N1],[B|N2],[D|N],C1,C,Dig,RestDig):-
summa1(N1,N2,N,C1,C2,Dig,Dig2),
summadigits(A,B,C2,D,C,Dig2,RestDig).
Previous slide
Next slide
Back to first slide
View graphic version