Just another update

Task/Conditional-structures/PL-I/conditional-structures-1.pli

@@ -1,14 +1,14 @@
-if condition then
-  statement;
-else
-  statement;
+if condition_exp then unique_statement; else unique_statement;
 
-if condition then
-  do;
-    statement-1;
-    .
-    .
-    statement-n;
-  end;
+if condition_exp then
+    unique_statement;
 else
-  statement;
+    unique_statement;
+
+if condition_exp
+then do;
+    list_of_statements;
+end;
+else do;
+    list_of_statements;
+end;

Task/Conditional-structures/PL-I/conditional-structures-2.pli

@@ -1,16 +1,21 @@
-select (i); /* select on value of variable */
-  when (1,4,9)
-    do;
-      statement(s)
-    end;
+if condition_exp1 then
+    statement_1;
+else if condition_exp2 then
+    statement_2;
+else if condition_expN then
+    statement_N;
+else
+    statement_E;
 
-  when (11, 42)
-    do;
-      statement(s)
-    end;
-
-  other /* everything else */
-    do;
-      statement(s)
-    end;
+if condition_exp1 then do;
+    list_of_statements;
+end;
+else if condition_exp2 then do;
+    list_of_statements;
+end;
+else if condition_expN then do;
+    list_of_statements;
+end;
+else do;
+    list_of_statements;
 end;

Task/Conditional-structures/PL-I/conditional-structures-3.pli

@@ -1,21 +1,16 @@
-select; /* select first matching condition */
-  when (i = 4);
+select (i); /* select on value of variable */
+  when (1,4,9)
     do;
-      statement(s)
+      statement_s;
     end;
 
-  when (this = that)
+  when (11, 42)
     do;
-      statement(s)
+      statement_s;
     end;
 
-  when (string = 'ABCDE')
+  other /* everything else */
     do;
-      statement(s)
-    end;
-
-  other
-    do;
-      statement(s)
+      statement_s;
     end;
 end;

Task/Conditional-structures/PL-I/conditional-structures-4.pli

@@ -0,0 +1,21 @@
+select; /* select first matching condition */
+  when (i = 4)
+    do;
+      statement_s;
+    end;
+
+  when (this = that)
+    do;
+      statement_s;
+    end;
+
+  when (mystring = 'ABCDE')
+    do;
+      statement_s;
+    end;
+
+  other
+    do;
+      statement_s;
+    end;
+end;