RosettaCodeData/Task/Multi-dimensional-array/ALGOL-W/multi-dimensional-array-1.alg

integer array a ( 1 :: 5, 1 :: 4, 1 :: 3, 1 :: 2 );