diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2022-01-04 21:18:09 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-01-04 21:18:09 +0000 |
| commit | d1581f755d50e5b3a5ccf74a25280f39caa809fc (patch) | |
| tree | 14d50cbd3a19dddf06cb89f16ea57155024e1da6 /challenge-146/abigail/lua | |
| parent | d8abd054e8e70147188d2b57c922ba092e2aecff (diff) | |
| parent | 41c3d16c97874e85d25f28d37e59df3e2d9a9d66 (diff) | |
| download | perlweeklychallenge-club-d1581f755d50e5b3a5ccf74a25280f39caa809fc.tar.gz perlweeklychallenge-club-d1581f755d50e5b3a5ccf74a25280f39caa809fc.tar.bz2 perlweeklychallenge-club-d1581f755d50e5b3a5ccf74a25280f39caa809fc.zip | |
Merge pull request #5463 from Abigail/abigail/week-146
Week 146
Diffstat (limited to 'challenge-146/abigail/lua')
| -rw-r--r-- | challenge-146/abigail/lua/ch-1.lua | 11 | ||||
| -rw-r--r-- | challenge-146/abigail/lua/ch-2.lua | 28 |
2 files changed, 39 insertions, 0 deletions
diff --git a/challenge-146/abigail/lua/ch-1.lua b/challenge-146/abigail/lua/ch-1.lua new file mode 100644 index 0000000000..563c4fbf4b --- /dev/null +++ b/challenge-146/abigail/lua/ch-1.lua @@ -0,0 +1,11 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-1.lua +-- + +print ("104743")
\ No newline at end of file diff --git a/challenge-146/abigail/lua/ch-2.lua b/challenge-146/abigail/lua/ch-2.lua new file mode 100644 index 0000000000..7429222642 --- /dev/null +++ b/challenge-146/abigail/lua/ch-2.lua @@ -0,0 +1,28 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-2.lua < input-file +-- + +for line in io . lines () do + local _, _, a, b = line : find ("([0-9]+)/([0-9]+)") + a = tonumber (a) + b = tonumber (b) + for i = 1, 2 do + if a < b then + b = b - a + else + a = a - b + end + if a == 0 or b == 0 then + goto out_of_loop + end + io . write (a .. "/" .. b .. " ") + end + ::out_of_loop:: + io . write ("\n") +end |