T[EE_,V0_] = 1/(1 + V0^2/(4EE(EE+V0)) Sin[Sqrt[EE+V0]]^2)

Plot[T[EE,20],{EE,0,200},PlotRange->{{0,200},{.8,1}}]