Как дети в школу.

[ufm]

-module(sum).
-export([sum/1]).

sum(N) -> sum_acc(N,0).
sum_acc(1,A) -> A+1;
sum_acc(N,A) -> sum_acc(N-1,A+N).

P.S. Кто угадает название учебника? :)

Originally published at U.F.M's Homepage. Please leave any comments there.