The leadingterm command computes the leading coefficients and monomials of polynomials A in the variables X. The command uses graded reverse lexicographical order. A can be either a polynomial or a vector of polynomials.
A = [x^2+y, x*y-1]; leadingterm(A,[x,y]); [[1, x^2], [1, x*y]]