From 2629af8bbb3ccbe6a020b74459261e7f3515d108 Mon Sep 17 00:00:00 2001
From: antranigv <antranig@cert.am>
Date: Fri, 2 Jun 2017 14:45:27 +0400
Subject: [PATCH] intro to variables

---
 variables/Makefile      | 10 ++++++++++
 variables/Variables.Mod | 31 +++++++++++++++++++++++++++++++
 2 files changed, 41 insertions(+)
 create mode 100644 variables/Makefile
 create mode 100644 variables/Variables.Mod

diff --git a/variables/Makefile b/variables/Makefile
new file mode 100644
index 0000000..49d5eff
--- /dev/null
+++ b/variables/Makefile
@@ -0,0 +1,10 @@
+VOC = /opt/voc/bin/voc
+
+all:
+	$(VOC) -m Variables.Mod
+
+clean:
+	rm *.c
+	rm *.h
+	rm *.o
+	rm *.sym
diff --git a/variables/Variables.Mod b/variables/Variables.Mod
new file mode 100644
index 0000000..4fc97b6
--- /dev/null
+++ b/variables/Variables.Mod
@@ -0,0 +1,31 @@
+MODULE variables;
+
+IMPORT Out;
+
+
+VAR
+	s		: ARRAY 32 OF CHAR;
+	i		: REAL;
+	n, m	: INTEGER;
+
+
+BEGIN
+	s := "Initial";
+	Out.String(s);  Out.Ln;
+	i := 3.14;
+	n := 64;
+	m := 42;
+	Out.Int(m, 0);  Out.Ln;
+	Out.Int(n, 0);  Out.Ln;
+	Out.Real(i, 0); Out.Ln;
+
+	s := "assigning new values";
+	Out.String(s);  Out.Ln;
+	i := 2.71;
+	n := 128;
+	m := 84;
+	Out.Int(m, 0);  Out.Ln;
+	Out.Int(n, 0);  Out.Ln;
+	Out.Real(i, 0);
+	Out.Ln
+END variables.