11 lines
184 B
Text
11 lines
184 B
Text
|
MODULE ArrayLength EXPORTS Main;
|
||
|
|
|
||
|
|
IMPORT IO;
|
||
|
|
|
||
|
|
VAR
|
||
|
|
Arr:ARRAY[1..2] OF TEXT :=
|
||
|
|
ARRAY[1..2] OF TEXT{"apples", "oranges"};
|
||
|
|
BEGIN
|
||
|
|
IO.PutInt(NUMBER(Arr));
|
||
|
|
END ArrayLength.
|