This task is about arrays.

For hashes or associative arrays, please see Creating an Associative Array.

For a definition and in-depth discussion of what an array is, see Array.



Task

Show basic array syntax in your language.

Basically, create an array, assign a value to it, and retrieve an element   (if available, show both fixed-length arrays and
dynamic arrays, pushing a value into it).

Please discuss at Village Pump:   Arrays.

Please merge code in from these obsolete tasks:

   Creating an Array
   Assigning Values to an Array
   Retrieving an Element of an Array


Related tasks

   Collections
   Creating an Associative Array
   Two-dimensional array (runtime)


BEGIN
 
  PROCEDURE STATIC;
  BEGIN
    INTEGER ARRAY X(0:4);
 
    X(0) := 10;
    X(1) := 11;
    X(2) := 12;
    X(3) := 13;
    X(4) := X(0);
 
    OUTTEXT("STATIC AT 4: ");
    OUTINT(X(4), 0);
    OUTIMAGE
  END STATIC;
 
  PROCEDURE DYNAMIC(N); INTEGER N;
  BEGIN
    INTEGER ARRAY X(0:N-1);
 
    X(0) := 10;
    X(1) := 11;
    X(2) := 12;
    X(3) := 13;
    X(4) := X(0);
 
    OUTTEXT("DYNAMIC AT 4: ");
    OUTINT(X(4),0);
    OUTIMAGE
  END DYNAMIC;
 
  STATIC;
  DYNAMIC(5)
END ARRAYS.
 