ContourPlot[(((1+x/100)^150-1)/(x/100)) = (200000/1720)*(1+x/100)^(150-y), {x, 0.1, 3}, {y, 0, 50}]