Anonymous user
Arrays: Difference between revisions
→{{header|Sidef}}
Thundergnat (talk | contribs) m (Reverted edits by Thundergnat (talk) to last revision by Arakov) |
|||
Line 4,922:
# retrieve an element
say arr[-1]; #=> 'baz'</lang>
=={{header|Simula}}==
<lang simula>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.
</lang>
=={{header|Slate}}==
| |||