RosettaCodeData/Task/Arrays/Modula-3/arrays-1.mod3

2 lines
33 B
Plaintext

VAR a: ARRAY [1..10] OF INTEGER;