ContourPlot[x Sin[x] + y Cos[y] == Pi/2, {x, -20, 20}, {y, -20, 20}]