I would like to determine the probability that a random quadratic polynomial has positive discriminant, where the 3 coefficients $a, b, c$ are normally distributed and independent:
That is, given $a,b,c \sim \operatorname{N}\left(0,1\right)$, what is ( a numerical approximation to 5 digits of ) $\operatorname{Pr}\left(\,{b^2 - 4 a c \geq 0}\,\right)$ ?
Thoughts:
We have
$$ \mathrm{Pr}\left(\,{b^2 - 4 a c \geq 0}\,\right) = \dfrac{1}{\left(\sqrt{\pi}\right)^3} \iiint_{\mathbb{R}^3} \mathbb{\large 1}_{b^{2}\ -\ 4ac\ \geq\ 0}\quad{\rm e}^{-a^2} {\rm e}^{-b^2}{\rm e}^{-c^2}\,\mathrm{d}a \,\mathrm{d}b \,\mathrm{d}c $$
This integral probably cannot be expressed explicitly, but even a numerical approximation is not so easy. Here is what I tried with SAGE, without success:
var('a,b,c')
RR = RealField(100)
I = integrate(integrate(integrate(exp(-a^2), a, 0, b^2/(4c)) exp(-c^2), c, 0, oo) * exp(-b^2), b, 0, oo) print(RR(I)) #error...
Expermenting with SAGE seems to give a probability between 0.64 and 0.65 (compare the values given below if $a,b,c$ are uniformly distributed):
N = 0
T = 10^5
for _ in range(T):
a = gauss(0, 1)
b = gauss(0, 1)
c = gauss(0, 1)
if b^2 - 4*a*c >= 0:
N += 1
print(float(N/T))
Other comments:
The idea to consider the normal distribution is that the vector $(a, b, c) / \sqrt{a^2 + b^2 + c^2}$ is uniformly distributed on the sphere, because the joint Gaussian distribution is spherically symmetric, and the property $b^2 - 4 a c \geq 0$ is invariant under rescaling.
Note that when $a,b,c \sim \mathrm{Unif}(-N, N)$ for some $N > 0$, the probability $\mathrm{Pr}(b^2 - 4 a c \geq 0)$ can be computed explicitly [1]: it is $$(41 + \log(64))/72 \approx 0.627207.$$ See also Probability that a quadratic polynomial with random coefficients has real roots for the case $a,b,c \sim \mathrm{Unif}(0, 1)$.