suma(1,1):-!.
suma(N,X):-N1 is N-1,suma(N1,S1),S is N+S1.

/* Poziva se sa: suma(PrirodanBroj,Sigma). */