diff options
Diffstat (limited to 'problem20.erl')
| -rwxr-xr-x | problem20.erl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/problem20.erl b/problem20.erl new file mode 100755 index 0000000..f393afb --- /dev/null +++ b/problem20.erl @@ -0,0 +1,5 @@ +-module(problem20). +-export([solve/0]). + +solve() -> lists:sum([X-48 || X <- integer_to_list(fact(100))]). +fact(1) -> 1; fact(X) -> X * fact(X-1). |