Solve[Integrate[PDF[NormalDistribution[0,1],x],{x,-t,t}]==.99,t]