1st commit on 085_lua

2 files changed, 36 insertions, 0 deletions

diff --git a/challenge-085/stuart-little/lua/ch-1.lua b/challenge-085/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..3188432ec2
--- /dev/null
+++ b/challenge-085/stuart-little/lua/ch-1.lua
@@ -0,0 +1,22 @@
+#!/usr/bin/env lua
+
+-- run <script> <space-separated numbers>
+
+local nrs={}
+for _,v in ipairs(arg) do
+   local nr=tonumber(v)
+   if nr<2 then table.insert(nrs,nr) end
+end
+table.sort(nrs)
+for i=1,#nrs-2 do
+   for j=i+1,#nrs-1 do
+      for k=j+1,#nrs do
+	 local s=nrs[i]+nrs[j]+nrs[k]
+	 if s>1 and s<2 then
+	    print(1)
+	    os.exit()
+	 end
+      end
+   end
+end
+print(0)
diff --git a/challenge-085/stuart-little/lua/ch-2.lua b/challenge-085/stuart-little/lua/ch-2.lua
new file mode 100755
index 0000000000..fb088b292b
--- /dev/null
+++ b/challenge-085/stuart-little/lua/ch-2.lua
@@ -0,0 +1,14 @@
+#!/usr/bin/env lua
+
+-- run <script> <number>
+
+for i=2,arg[1] do
+   local base = math.floor(math.exp(math.log(arg[1])/i))
+   for j=0,1 do
+      if (base+j)^i==tonumber(arg[1]) then
+	 print(("%d: %d = %d ^ %d"):format(1,arg[1],base+j,i))
+	 os.exit()
+      end
+   end
+end
+print(0)