DiscretePlot[{Product[1-1/(2*k),{k,1,n}],Sqrt[2/Pi*1/(2n+1)]},{n,1,100}]