aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2022-09-01 19:12:11 +0100
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2022-09-01 19:12:11 +0100
commitd1d8886281c19a0f6119fea49e2f3a9a1b068a89 (patch)
tree11f6caddd7c6deff926ced3f2ab5920e0f37d21b
parentd9f37544a8e230d1a709621961b5c564263cf01e (diff)
downloadperlweeklychallenge-club-d1d8886281c19a0f6119fea49e2f3a9a1b068a89.tar.gz
perlweeklychallenge-club-d1d8886281c19a0f6119fea49e2f3a9a1b068a89.tar.bz2
perlweeklychallenge-club-d1d8886281c19a0f6119fea49e2f3a9a1b068a89.zip
- Added more guest contribution by Robert DiCicco.
-rw-r--r--challenge-180/robert-dicicco/lua/ch-2.lua63
1 files changed, 63 insertions, 0 deletions
diff --git a/challenge-180/robert-dicicco/lua/ch-2.lua b/challenge-180/robert-dicicco/lua/ch-2.lua
new file mode 100644
index 0000000000..5f1f75bf43
--- /dev/null
+++ b/challenge-180/robert-dicicco/lua/ch-2.lua
@@ -0,0 +1,63 @@
+--[[
+
+AUTHOR: Robert DiCicco
+DATE: 2022-09-01
+Challenge #180 Trim List ( Lua )
+
+--]]
+
+local write = io.write
+
+function printInputLine(a,n)
+
+ write("Input: ( ")
+
+ for _, x in ipairs(a) do
+
+ write(x,' ')
+
+ end
+
+ write(")")
+
+ write(" and $i = ",n)
+
+ write('\n')
+
+end
+
+function process(a,n)
+
+ write("Output: ( ")
+
+ for _, x in ipairs(a) do
+
+ if x > n then
+
+ write(x,' ')
+
+ end
+
+ end
+
+ write(") ")
+
+ write('\n\n')
+
+end
+
+arr = {9,0,6,2,3,8,5}
+
+mynum = 4
+
+printInputLine(arr,mynum)
+
+process(arr,mynum)
+
+arr = {1,4,2,3,5}
+
+mynum = 3
+
+printInputLine(arr,mynum)
+
+process(arr,mynum)