x

Normal

P(X=x)= {n \choose x}p^x(1-p)^{n-x} 

xx = 17 (slider from 0 to n, step 1)
n = 50 (slider from 1 to 100, step 1)
p = 0.4 (slider from 0 to 1, step 0.01)
a = BinomialDist(n, p)
μ: (n * p)
σ: sqrt(((n * p) * (1 - p)))
f(x) = (1 / ((σ * sqrt((2 * π)))) * ℯ^(((-(x - μ)^(2))) / ((2 * σ^(2)))))
b = false
A: (xx, 0)
d = BinomialDist(n, p, xx, false)
B: (xx, d)
c = Integral(f, xx - 0.5, xx + 0.5)
texto4: "P(X=" + (LaTeX[xx]) + ")=" + (LaTeX[d]) + ""
texto5: "P(" + (LaTeX[xx]) + "-0.5<X'<" + (LaTeX[xx]) + "+0.5)=" + (LaTeX[c]) + ""
texto3: "Normal\\X'\equiv  N(" + (LaTeX[μ]) + "," + (LaTeX[σ]) + ")"
texto2: "\boxed{\mu=np=" + (LaTeX[n]) + "·" + (LaTeX[p]) + "=" + (LaTeX[μ]) + "\\
\sigma=\sqrt{np(1-p)}=\sqrt{" + (LaTeX[n]) + "·" + (LaTeX[p]) + "(1-" + (LaTeX[p]) + ")}=" + (LaTeX[σ]) + "}"
texto1: "X\equiv B(n,p)=B(" + (LaTeX[n]) + "," + (LaTeX[p]) + ")"