diff options
Diffstat (limited to 'challenge-151/abigail/lua/ch-2.lua')
| -rw-r--r-- | challenge-151/abigail/lua/ch-2.lua | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/challenge-151/abigail/lua/ch-2.lua b/challenge-151/abigail/lua/ch-2.lua new file mode 100644 index 0000000000..98df0aae1d --- /dev/null +++ b/challenge-151/abigail/lua/ch-2.lua @@ -0,0 +1,33 @@ +#!/opt/local/bin/lua + +-- +-- See https://theweeklychallenge.org/blog/perl-weekly-challenge-151 +-- + +-- +-- Run as: lua ch-2.lua < input-file +-- + +for line in io . lines () do + local houses = {} + local best = {} + for val in line : gmatch ("%d+") do + houses [#houses + 1] = val + end + + for i = #houses, 1, -1 do + if 2 >= #houses then + best [i] = houses [i] + elseif i == #houses then + best [i] = houses [i] + elseif i == 0 then + best [i] = houses [i] + best [i + 2] + elseif i == #houses - 1 then + best [i] = math . max (houses [i], best [i + 1]) + else + best [i] = math . max (houses [i] + best [i + 2], + best [i + 1]) + end + end + print (best [1]) +end |
