aboutsummaryrefslogtreecommitdiff
path: root/challenge-195/deadmarshal/lua/ch-1.lua
diff options
context:
space:
mode:
author冯昶 <fengchang@novel-supertv.com>2022-12-21 09:57:58 +0800
committer冯昶 <fengchang@novel-supertv.com>2022-12-21 09:57:58 +0800
commitdd2a89a7880a924c4e3df167d71c34b4ed89a3fe (patch)
treeb208bd6dc97a7b4f025f62c78401dae7a796362c /challenge-195/deadmarshal/lua/ch-1.lua
parent7de47c639d3bc4fef60d8df2128c14049f47b1fd (diff)
parentd05040719c41d928cb4663bac89448f14fd74268 (diff)
downloadperlweeklychallenge-club-dd2a89a7880a924c4e3df167d71c34b4ed89a3fe.tar.gz
perlweeklychallenge-club-dd2a89a7880a924c4e3df167d71c34b4ed89a3fe.tar.bz2
perlweeklychallenge-club-dd2a89a7880a924c4e3df167d71c34b4ed89a3fe.zip
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'challenge-195/deadmarshal/lua/ch-1.lua')
-rw-r--r--challenge-195/deadmarshal/lua/ch-1.lua26
1 files changed, 26 insertions, 0 deletions
diff --git a/challenge-195/deadmarshal/lua/ch-1.lua b/challenge-195/deadmarshal/lua/ch-1.lua
new file mode 100644
index 0000000000..e2b7dfcf00
--- /dev/null
+++ b/challenge-195/deadmarshal/lua/ch-1.lua
@@ -0,0 +1,26 @@
+#!/usr/bin/env lua
+
+local function has_dups(n)
+ assert(type(n) == 'number','n must be a number!')
+ if n > 9999999999 then return true end
+ local hash = {}
+ while n ~= 0 do
+ if(hash[n%10] ~= nil) then return true end
+ hash[n%10] = 1
+ n = n // 10
+ end
+ return false
+end
+
+local function special_integers(n)
+ assert(type(n) == 'number','n must be a number!')
+ local count = 0
+ for i=1, n do
+ if not has_dups(i) then count = count + 1 end
+ end
+ return count
+end
+
+print(special_integers(15))
+print(special_integers(35))
+