NMaximize[{16/Sqrt(a)+2 Sqrt(6 Sqrt(a-8)/Sqrt(a)),a>8},a]