Data update

Task/Pick-random-element/ALGOL-68/pick-random-element.alg

@@ -1,23 +1,22 @@
-# pick a random element from an array of strings #
+BEGIN # pick a random element from an array of strings #
 
-OP PICKRANDOM = ( []STRING list )STRING:
-BEGIN
+    OP PICKRANDOM = ( []STRING list )STRING:
+    BEGIN
 
-    INT number of elements = ( UPB list - LWB list ) + 1;
-    INT random element     =
-        ENTIER ( next random * ( number of elements ) );
+        INT number of elements = ( UPB list - LWB list ) + 1;
+        INT random element     =
+            ENTIER ( next random * ( number of elements ) );
 
-    list[ LWB list + random element ]
-END; # PICKRANDOM #
-# can define additional operators for other types of array #
+        list[ LWB list + random element ]
+    END; # PICKRANDOM #
+    # can define additional operators for other types of array #
 
 
-main: (
+    BEGIN
+        []STRING days = ( "Sunday",   "Monday", "Tuesday", "Wednesday"
+                        , "Thursday", "Friday", "Saturday"
+                        );
 
-    []STRING days = ( "Sunday",   "Monday", "Tuesday", "Wednesday"
-                    , "Thursday", "Friday", "Saturday"
-                    );
-
-    print( ( PICKRANDOM days, newline ) )
-
-)
+        print( ( PICKRANDOM days, newline ) )
+    END
+END

Task/Pick-random-element/EasyLang/pick-random-element.easy

@@ -1,2 +1,2 @@
 ar$[] = [ "spring" "summer" "autumn" "winter" ]
-print ar$[randint len ar$[]]
+print ar$[random len ar$[]]

Task/Pick-random-element/Nu/pick-random-element.nu

@@ -0,0 +1 @@
+[5 6 7 8 9] | get (random int ..<($in | length))