BEGIN
    INTEGER N,M;
    M := ININT;
    N := ININT;
    BEGIN
        INTEGER ARRAY A(1:M,1:N);
        A(M,N) := 99;
        OUTINT(A(M,N),0);
        OUTIMAGE;
    END;
    ! ARRAY A OUT OF SCOPE ;
END.