NSolve[{D[Sin[x]*Sin[y],x] == 0, D[Sin[x]*Sin[y],y] == 0},{x,y}]