n = 100 (slider from 0 to 1000, step 50)
p = 0.35 (slider from 0 to 1, step 0.01)
np: n * p
σ: (n * p * (1 - p))^(0.5)
probasX = Sequence(Binomial[n, k] * p^(k) * (1 - p)^(n - k), k, 0, n)
abscissesT = Sequence((k - n * p - 0.5) / σ, k, 0, n + 1, 1)
Z = Histogram(abscissesT, probasX * σ)
f(x) = 1 / (2 * π)^(0.5) * exp((-x^(2)) / 2)
a = 0 (slider from 0 to 10, step 0.5)
A = Integral(f, -a, a)