avancer

reculer

hérisson

koala

éléphant

question

A = Point(xAxis)
B = (10, 1)
C = (10, -1)
D = (10.4, 0.12)
c = Ellipse(B, C, D)
E = Point(xAxis)
a: Distance[A, E] / 10.0
c' = Dilate(c, a, E)
b = OrthogonalLine(E, xAxis)
F, G = Intersect(c', b)
d = Segment(A, G)
e = Segment(A, F)
H = (8, 3)
I = (12, 2)
J = (8, -2)
K = (12, -3)
poly1, h, j, k, i = Polygon(H, J, K, I)
u = Vector(A, E)
v = Vector(E, A)
L = Point(xAxis)
f = OrthogonalLine(L, xAxis)
g = OrthogonalLine(G, f)
l = OrthogonalLine(F, f)
M = Intersect(g, f)
N = Intersect(l, f)
w = Vector(N, M)
z = Vector(M, N)
texte1: "distance lampe-écran : " + (a * 10.0) + " m"
texte2: "diamètre du disque de lumière : " + (Distance[M, N] * 1.2 / 2.16) + " m"
m = 1 (slider from 1 to 3, step 1)
affich1 = If(m ≠ 1.0, 0.0, 1.0)
affich2 = If(m ≠ 2.0, 0.0, 1.0)
affich3 = If(m ≠ 3.0, 0.0, 1.0)
n = -1.15 (slider from -3.8 to -0.35, step 0.05)
O = (3.92, -1.8)
liste1 = Sequence((x(O) - n * cos(3.1416 * i / 180.0), y(O) - n * sin(3.1416 * i / 180.0)), i, 0.0, 360.0, 5.0)
liste2 = Sequence((x(O) + 100.0 * cos(3.1416 * i / 180.0), y(O) + 100.0 * sin(3.1416 * i / 180.0)), i, 0.0, 360.0, 5.0)
liste3 = Sequence(Polygon[Element[liste2, i], Element[liste2, i + 1.0], Element[liste1, i + 1.0], Element[liste1, i]], i, 1.0, 72.0)
texte5: "diamètre : " + ((n / 2.0)^(2.0)) + " m"
o = If(n ≠ -1.0 * 1.0 * 1.0 * 0.35, round(-1.0 * n * 782.6087 - 273.9), round(100.0 * (-1.0 * n * 782.6087 - 273.9)) / 100.0)
texte10: "distance lampe-objet éclairé : " + o + " m"