diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2022-01-23 19:46:16 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-01-23 19:46:16 +0000 |
| commit | a3ef8061e8b28fd26ff9aa4ee3fc9f39ceb55dc1 (patch) | |
| tree | e65b7cbfb63e9b6bbcdb6b173bfec9215e70151d /challenge-148/abigail/lua/ch-1.lua | |
| parent | 919e4948116f4a0f1c1c2580b856dd221568dcb0 (diff) | |
| parent | 895121c6f016a222efcfe4a99df34b8138fb2055 (diff) | |
| download | perlweeklychallenge-club-a3ef8061e8b28fd26ff9aa4ee3fc9f39ceb55dc1.tar.gz perlweeklychallenge-club-a3ef8061e8b28fd26ff9aa4ee3fc9f39ceb55dc1.tar.bz2 perlweeklychallenge-club-a3ef8061e8b28fd26ff9aa4ee3fc9f39ceb55dc1.zip | |
Merge pull request #5552 from Abigail/abigail/week-148
Abigail/week 148
Diffstat (limited to 'challenge-148/abigail/lua/ch-1.lua')
| -rw-r--r-- | challenge-148/abigail/lua/ch-1.lua | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/challenge-148/abigail/lua/ch-1.lua b/challenge-148/abigail/lua/ch-1.lua new file mode 100644 index 0000000000..246f1db062 --- /dev/null +++ b/challenge-148/abigail/lua/ch-1.lua @@ -0,0 +1,21 @@ +#!/opt/local/bin/lua + +-- +-- See https://theweeklychallenge.org/blog/perl-weekly-challenge-148 +-- + +-- +-- Run as: lua ch-1.lua +-- + +for i = 0, 100 do + local t = math . floor (i / 10) + local u = i % 10 + if not (i == 0 or t == 1 or u == 1 or t == 7 or u == 7 + or t == 8 or u == 8 or t == 9 or u == 9 + or t == 2 or u == 3 or u == 5 or i == 100) then + io . write (i, " ") + end +end + +io . write ("\n") |