f(x) = If[0 < x < 1000, (-25 * x^(2)) + (32400 * x)]
g(x) = If[0 < x < 1000, (0.03 * x^(3)) - (48 * x^(2)) + (27600 * x)]
A = Extremum(f)