tasks a-s
This commit is contained in:
parent
47bf37c096
commit
b83f433714
12433 changed files with 156208 additions and 123 deletions
8
Task/Pascals-triangle/Erlang/pascals-triangle.erl
Normal file
8
Task/Pascals-triangle/Erlang/pascals-triangle.erl
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
-import(lists).
|
||||
-export([pascal/1]).
|
||||
|
||||
pascal(1)-> [[1]];
|
||||
pascal(N) ->
|
||||
L = pascal(N-1),
|
||||
[H|_] = L,
|
||||
[lists:zipwith(fun(X,Y)->X+Y end,[0]++H,H++[0])|L].
|
||||
Loading…
Add table
Add a link
Reference in a new issue