Reorganize 2019 solutions

1 files changed, 37 insertions, 0 deletions

diff --git a/2019/nim/day04.nim b/2019/nim/day04.nim
new file mode 100644
index 0000000..eb6d933
--- /dev/null
+++ b/2019/nim/day04.nim
@@ -0,0 +1,37 @@
+# Day Four: Secure Container
+import os, strutils, sequtils
+
+let input: string = paramStr(1)
+let bounds: seq[int] = map(split(strip(readFile(input)), '-'), parseInt)
+var valid, details: int = 0
+
+proc criteria(password: int): bool =
+  var password: string = $password
+  for digit in 0 .. 4:
+    if password[digit] > password[digit+1]:
+      return false
+  for digit in 0 .. 4:
+    if password[digit] == password[digit+1]:
+      return true
+  return false
+
+proc extracriteria(password: int): bool =
+  var password: string = $password
+  for digit in 0 .. 4:
+    if password[digit] > password[digit+1]:
+      return false
+  for digit in 0 .. 4:
+    if password[digit] == password[digit+1]:
+      if digit == 0 or password[digit] != password[digit-1]:
+        if digit == 4 or password[digit] != password[digit+2]:
+          return true
+  return false
+
+for password in bounds[0] .. bounds[1]:
+  if criteria(password): inc(valid)
+
+for password in bounds[0] .. bounds[1]:
+  if extracriteria(password): inc(details)
+
+echo valid
+echo details