Just another update

Task/Conditional-structures/Scheme/conditional-structures-4.ss

@@ -1,2 +1 @@
-no
-#<unspecified>
+(cond <clause1> <clause2> ...)

Task/Conditional-structures/Scheme/conditional-structures-5.ss

@@ -1 +1,9 @@
-(cond <clause1> <clause2> ...)
+(display
+  (cond ((> 1 2) "greater")
+        ((< 1 2) "less")))
+(newline)
+(display
+  (cond ((> 1 1) "greater")
+        ((< 1 1) "less")
+        (else "equal")))
+(newline)

Task/Conditional-structures/Scheme/conditional-structures-6.ss

@@ -1,9 +1 @@
-(display
-  (cond ((> 1 2) "greater")
-        ((< 1 2) "less")))
-(newline)
-(display
-  (cond ((> 1 1) "greater")
-        ((< 1 1) "less")
-        (else "equal")))
-(newline)
+(case <key> <clause1> <clause2> ...)

Task/Conditional-structures/Scheme/conditional-structures-7.ss

@@ -1,2 +1,11 @@
-less
-equal
+(display
+  (case (* 2 3)
+    ((2 3 5 7) "prime")
+    ((1 4 6 8 9) "composite")))
+(newline)
+(display
+  (case (car (list c d))
+    ((a e i o u) "vowel")
+    ((w y) "semivowel")
+    (else "consonant")))
+(newline)