Merge pull request #5442 from Abigail/abigail/week-145

Week 145

2 files changed, 56 insertions, 0 deletions

diff --git a/challenge-145/abigail/lua/ch-1.lua b/challenge-145/abigail/lua/ch-1.lua
new file mode 100644
index 0000000000..27ab36961a
--- /dev/null
+++ b/challenge-145/abigail/lua/ch-1.lua
@@ -0,0 +1,30 @@
+#!/opt/local/bin/lua
+
+--
+-- See ../README.md
+--
+
+--
+-- Run as: lua ch-1.lua < input-file
+--
+
+local a = {}
+local b = {}
+
+local a_line = io . read ("*l")
+local b_line = io . read ("*l")
+
+for n in a_line : gmatch ("-?[0-9]+") do
+    a [#a + 1] = tonumber (n)
+end
+for n in b_line : gmatch ("-?[0-9]+") do
+    b [#b + 1] = tonumber (n)
+end
+
+local sum = 0
+
+for i = 1, #a do
+    sum = sum + a [i] * b [i]
+end
+
+print (sum)
diff --git a/challenge-145/abigail/lua/ch-2.lua b/challenge-145/abigail/lua/ch-2.lua
new file mode 100644
index 0000000000..521f8b0acf
--- /dev/null
+++ b/challenge-145/abigail/lua/ch-2.lua
@@ -0,0 +1,26 @@
+#!/opt/local/bin/lua
+
+--
+-- See ../README.md
+--
+
+--
+-- Run as: lua ch-2.lua < input-file
+--
+
+for line in io . lines () do
+    local palindromes = {}
+    local out = ""
+    for i = 1, #line do
+        for j = i, #line do
+            local string = line : sub (i, j)
+            if string == string : reverse () then
+                if palindromes [string] == nil
+                then out = out .. string .. " "
+                     palindromes [string] = 1
+                end
+            end
+        end
+    end
+    print (out : sub (1, #out - 1))
+end