Minimize[{14k+19l,k*l^2=450},{k,l}]