ContourPlot[{2x+y==5,3x-y=10},{x,0,5},{y,-7,3}]