begin
   comment LIBRARY 1;
   integer
     N;
   N ≔ 3;
   begin
      array
        A[1 : if N = 3 then 3 else - 100];
      integer
        N;
      N ≔ 2;
      OUTREAL(99, N);
   end;
   OUTREAL(99, N)
end