aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xchallenge-072/stuart-little/lua/ch-1.lua14
-rwxr-xr-xchallenge-072/stuart-little/lua/ch-2.lua16
2 files changed, 30 insertions, 0 deletions
diff --git a/challenge-072/stuart-little/lua/ch-1.lua b/challenge-072/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..0515cf6461
--- /dev/null
+++ b/challenge-072/stuart-little/lua/ch-1.lua
@@ -0,0 +1,14 @@
+#!/usr/bin/env lua
+
+-- run <script> <number>
+
+function factExp(n,p)
+ local s,frct=0,n/p
+ while frct >= 1 do
+ s=s+math.floor(frct)
+ frct=frct/p
+ end
+ return s
+end
+
+print(math.min(factExp(arg[1],2),factExp(arg[1],5)))
diff --git a/challenge-072/stuart-little/lua/ch-2.lua b/challenge-072/stuart-little/lua/ch-2.lua
new file mode 100755
index 0000000000..9c7d4bb302
--- /dev/null
+++ b/challenge-072/stuart-little/lua/ch-2.lua
@@ -0,0 +1,16 @@
+#!/usr/bin/env lua
+
+-- run <script> <file 1st-line-nr 2nd-line-nr>
+
+function lnRng(pth,l1,l2)
+ local ix,lns=0,{}
+ for l in io.lines(pth) do
+ ix=ix+1
+ if ix>=l1 and ix<=l2 then table.insert(lns,l) end
+ end
+ return lns
+end
+
+for _,l in ipairs(lnRng(arg[1],tonumber(arg[2]),tonumber(arg[3]))) do
+ print(l)
+end