diff options
| author | Abigail <abigail@abigail.be> | 2021-07-12 16:04:39 +0200 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2021-07-12 18:43:38 +0200 |
| commit | b6998257ebb26100a3566169cfd6dc0b8d3a060f (patch) | |
| tree | ca7f074f7f33c3229408c738e164f657b88fa3cf /challenge-121/abigail/lua | |
| parent | 5f2d90da63b25cf21b53a3f557fb71a11a5ace06 (diff) | |
| download | perlweeklychallenge-club-b6998257ebb26100a3566169cfd6dc0b8d3a060f.tar.gz perlweeklychallenge-club-b6998257ebb26100a3566169cfd6dc0b8d3a060f.tar.bz2 perlweeklychallenge-club-b6998257ebb26100a3566169cfd6dc0b8d3a060f.zip | |
Solutions in 16 languages for week 121, part 1
Diffstat (limited to 'challenge-121/abigail/lua')
| -rw-r--r-- | challenge-121/abigail/lua/ch-1.lua | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/challenge-121/abigail/lua/ch-1.lua b/challenge-121/abigail/lua/ch-1.lua new file mode 100644 index 0000000000..52b7529007 --- /dev/null +++ b/challenge-121/abigail/lua/ch-1.lua @@ -0,0 +1,23 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-1.lua < input-file +-- + +for line in io . lines () do + _, _, m, n = line : find ("(%d+)%s+(%d+)") + x = 1 + for i = 1, n - 1 do + x = x * 2 + end + if math . floor (m / x) % 2 == 1 then + m = m - x + else + m = m + x + end + print (m) +end |