Add some inputs and results for grace programs

kostis · May 19, 2024 · 111dabb · 111dabb
1 parent ca3c313
commit 111dabb
Show file tree

Hide file tree

Showing 11 changed files with 463 additions and 18 deletions.
diff --git a/grace/programs/divisibleby3.grc b/grace/programs/divisibleby3.grc
@@ -48,5 +48,5 @@ fun main() : nothing
   writeString(" is ");
   if divisibleBy3(n) # 1 then
     writeString("not ");
-  writeString("divided by 3.\n");
+  writeString("divisible by 3\n");
 } $ main
diff --git a/grace/programs/divisibleby3.result b/grace/programs/divisibleby3.result
@@ -0,0 +1 @@
+54 is divisible by 3
diff --git a/grace/programs/evenodd.grc b/grace/programs/evenodd.grc
@@ -12,6 +12,14 @@ $$
 
 fun main(): nothing
 
+  fun abs(n: int): int
+  { $ abs
+    if n < 0 then
+      return -n;
+    else
+      return n;
+  }
+
   fun even(n: int): int;
 
   fun odd(n: int): int
@@ -33,7 +41,7 @@ fun main(): nothing
 { $ main
   writeString("Please, give an integer: ");
 
-  if odd(readInteger()) = 1 then
+  if odd(abs(readInteger())) = 1 then
     writeString("odd\n");
   else
     writeString("even\n");

diff --git a/grace/programs/evenodd.input b/grace/programs/evenodd.input
@@ -0,0 +1 @@
+4711
diff --git a/grace/programs/evenodd.result b/grace/programs/evenodd.result
@@ -0,0 +1 @@
+Please, give an integer: odd
diff --git a/grace/programs/functionestscope.result b/grace/programs/functionestscope.result
@@ -0,0 +1,2 @@
+Test 1 Success 
+Test 2 Success 
diff --git a/grace/programs/hanoi.input b/grace/programs/hanoi.input
@@ -1 +1 @@
-7
+9