Intervalo [ μ-σ,μ+σ ]

Intervalo [ μ-2σ,μ+2σ ]

Intervalo livre

b = 3 (slider from -5 to 15, step 0.1)
a = 6 (slider from -5 to 15, step 0.1)
maxab = Max(a, b)
minab = Min(a, b)
σ = 1 (slider from 0.01 to 5, step 0.01)
μ = 4 (slider from -3 to 13, step 0.1)
f(x) = 1 / (σ sqrt(2 * 3.14)) exp(-(x - μ)^(2) / (2 σ^(2)))
inf: μ - σ
sup: μ + σ
g = Integral(f, inf, sup)
inf2: μ - 2 σ
sup2: μ + 2 σ
h = Integral(f, inf2, sup2)
c = Integral(f, minab, maxab)
d = false
e = false
i = false

Tool: Recta (Ponto e Declive) (command RectaPm)
Seleccione um ponto da recta e o declive
Input: A, m
Output: a

P_{auxiliar}: (x(A) + 1, y(A) + m)
a = Line(A, P_{auxiliar})

Tool: Trissecção
Seleccione 2 pontos (extremos do segmento de recta)
Input: H, I
Output: M, N

g = Segment(H, I)
h = Circle(H, I)
k = Circle(I, H)
J = Intersect(h, k, 2)
p = Circle(J, H)
i = Ray(I, J)
K = Intersect(p, i, 2)
L = Intersect(h, k, 1)
j = Segment(K, L)
M = Intersect(g, j)
q = Circle(M, H)
N = Intersect(q, g, 2)

Tool: Recta (Ponto e Declive) (command RectaPm1)
Seleccione um ponto da recta e o declive
Input: A, m
Output: a

P_{auxiliar}: (x(A) + 1, y(A) + m)
a = Line(A, P_{auxiliar})