Plot[ {(4/a + 1/(6 - a))/2, Sqrt[4/(a (6 - a))]} , {a,0,6} ]