Task6.1.11

% Сформировать список из N последовательных натуральных чисел, начиная с 10. Найти сумму его элементов .

genl(0, _, []):-!.
genl(M, N,[N|L]):-M1 is M-1, N1 is N+1, genl(M1, N1,L).

suml([], 0):-!.
suml([N|L], Sum):-sum_list(L, Sum1), Sum is Sum1 + N.

sum(M, N, Res):- genl(M, N, Res1), suml(Res1, Res).

%%sum(5, 10, Res)