Maximum triangle path sum: Difference between revisions
Content added Content deleted
(made more fluent) |
(Added Elixir) |
||
Line 369: | Line 369: | ||
{{out}} |
{{out}} |
||
<pre>1320</pre> |
<pre>1320</pre> |
||
=={{header|Elixir}}== |
|||
<lang elixir>defmodule Maximum do |
|||
def triangle_path(text) do |
|||
String.split(text, "\n", trim: true) |
|||
|> Enum.map(fn line -> String.split(line) |> Enum.map(&String.to_integer(&1)) end) |
|||
|> Enum.reduce([], fn x,total -> |
|||
Enum.chunk([0]++total++[0], 2, 1) |
|||
|> Enum.map(&Enum.max(&1)) |
|||
|> Enum.zip(x) |
|||
|> Enum.map(fn{a,b} -> a+b end) |
|||
end) |
|||
|> Enum.max |
|||
end |
|||
end |
|||
text = """ |
|||
55 |
|||
94 48 |
|||
95 30 96 |
|||
77 71 26 67 |
|||
97 13 76 38 45 |
|||
07 36 79 16 37 68 |
|||
48 07 09 18 70 26 06 |
|||
18 72 79 46 59 79 29 90 |
|||
20 76 87 11 32 07 07 49 18 |
|||
27 83 58 35 71 11 25 57 29 85 |
|||
14 64 36 96 27 11 58 56 92 18 55 |
|||
02 90 03 60 48 49 41 46 33 36 47 23 |
|||
92 50 48 02 36 59 42 79 72 20 82 77 42 |
|||
56 78 38 80 39 75 02 71 66 66 01 03 55 72 |
|||
44 25 67 84 71 67 11 61 40 57 58 89 40 56 36 |
|||
85 32 25 85 57 48 84 35 47 62 17 01 01 99 89 52 |
|||
06 71 28 75 94 48 37 10 23 51 06 48 53 18 74 98 15 |
|||
27 02 92 23 08 71 76 84 15 52 92 63 81 10 44 10 69 93 |
|||
""" |
|||
IO.puts Maximum.triangle_path(text)</lang> |
|||
{{out}} |
|||
<pre> |
|||
1320 |
|||
</pre> |
|||
=={{header|ERRE}}== |
=={{header|ERRE}}== |
||
Line 429: | Line 472: | ||
END PROGRAM |
END PROGRAM |
||
</lang> |
</lang> |
||
=={{Header|FreeBASIC}}== |
=={{Header|FreeBASIC}}== |
||
<lang FreeBASIC>' version 21-06-2015 |
<lang FreeBASIC>' version 21-06-2015 |