Added bardemo

programs/bardemo.tri

@@ -0,0 +1,15 @@
+! this won't work until after some work in the practicals
+let
+    var a : Integer;
+    var b : Integer
+
+in
+    begin
+        a := 1;
+        b := 2;
+        
+        putint(a);
+        putint(b);
+        putint(|a);
+        putint(|b)
+    end