From 0ed96034b49aa270842285d4170d2893641a2bfa Mon Sep 17 00:00:00 2001 From: Abigail Date: Tue, 12 Oct 2021 11:23:54 +0200 Subject: Lua solutions for week 134 --- challenge-134/abigail/README.md | 6 ++++-- challenge-134/abigail/lua/ch-1.lua | 13 +++++++++++++ challenge-134/abigail/lua/ch-2.lua | 24 ++++++++++++++++++++++++ 3 files changed, 41 insertions(+), 2 deletions(-) create mode 100644 challenge-134/abigail/lua/ch-1.lua create mode 100644 challenge-134/abigail/lua/ch-2.lua diff --git a/challenge-134/abigail/README.md b/challenge-134/abigail/README.md index e3b1b50bb8..3ea3d1e459 100644 --- a/challenge-134/abigail/README.md +++ b/challenge-134/abigail/README.md @@ -6,11 +6,13 @@ * [Bash](bash/ch-1.sh) * [Befunge-93](befunge-93/ch-1.bf93) * [C](c/ch-1.c) +* [Lua](lua/ch-1.lua) * [Perl](perl/ch-1.pl) ## Part 2 * [AWK](awk/ch-2.awk) -* [Bash](bash/ch-1.sh) -* [C](c/ch-1.c) +* [Bash](bash/ch-2.sh) +* [C](c/ch-2.c) +* [Lua](lua/ch-2.lua) * [Perl](perl/ch-2.pl) diff --git a/challenge-134/abigail/lua/ch-1.lua b/challenge-134/abigail/lua/ch-1.lua new file mode 100644 index 0000000000..1b0d219dce --- /dev/null +++ b/challenge-134/abigail/lua/ch-1.lua @@ -0,0 +1,13 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-1.lua +-- + +for _, tail in ipairs ({789, 798, 879, 897, 978}) do + print (1023456000 + tail) +end diff --git a/challenge-134/abigail/lua/ch-2.lua b/challenge-134/abigail/lua/ch-2.lua new file mode 100644 index 0000000000..4ea5926b60 --- /dev/null +++ b/challenge-134/abigail/lua/ch-2.lua @@ -0,0 +1,24 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-2.lua < input-file +-- + +for line in io . lines () do + local _, _, m, n = line : find ("([0-9]+)%s+([0-9]+)") + local seen = {} + local count = 0 + for x = 1, m do + for y = 1, n do + if seen [x * y] == nil then + seen [x * y] = 1 + count = count + 1 + end + end + end + print (count) +end -- cgit