proc main() {
  var a: array[1] of int;
  a[0] := 5;

  printi(a[0]);
}