Data update

Task/Department-numbers/MATLAB/department-numbers.m

@@ -0,0 +1,18 @@
+% Execute the functions
+clear all;close all;clc;
+sol = findsolution();
+disp(table(sol(:, 1), sol(:, 2), sol(:, 3), 'VariableNames',{'Pol.','Fire','San.'}))
+
+function sol = findsolution()
+    rng = 1:7;
+    sol = [];
+    for p = rng
+        for f = rng
+            for s = rng
+                if p ~= s && s ~= f && f ~= p && p + s + f == 12 && mod(p, 2) == 0
+                    sol = [sol; p s f];
+                end
+            end
+        end
+    end
+end

Task/Department-numbers/MiniScript/department-numbers.mini

@@ -0,0 +1,17 @@
+print "Police  Sanitation  Fire"
+print "------  ----------  ----"
+count = 0
+for h in range(1, 3)
+  i = h * 2
+  for j in range(1, 7)
+    if j != i then
+      for k in range(1, 7)
+        if k != i and k != j and i + j + k == 12 then
+          print "  " + i + "         " + j + "         " + k
+          count += 1
+        end if
+      end for
+    end if
+  end for
+end for
+print char(10) + count + " valid combinations"