FindRoot[Integrate[1/Sqrt[2 Pi]*Exp[-x^2/2], {x, 0, y}] == 0.5/2, {y, 0}]