NIntegrate[EllipticK[Sqrt[1-((1-x^2)/2)^2]]/Sqrt[1+x^2],{x,0,1}]