oscil_energy_x
Author: EKFE Kallipolis
Date: 19 Μάρτιος 2014

Η ενέργεια στην απλή αρμονική ταλάντωση

start

stop

restart

E

K

U

φ_0ο = 0 (slider from 0 to 180, step 15)
h = 50 (slider from -5 to 50, step 1)
t = 0 (slider from 0 to 10, step 0.01)
A = 3 (slider from 1 to 3, step 0.5)
T = 2 (slider from 1 to 3, step 0.5)
φ_0: φ_0ο * π / 180
ω: 2 * π / T
d = 0 (slider from 0 to 5, step 1)
Α: (d + A * sin(ω * t + φ_0), h)
Β: (ω / 5 * A * cos(ω * t + φ_0) + x(Α), h)
v_' = Vector(Α, Β)
O: (d, h)
v = If(0 ≤ x ≤ t, ω * A * cos(ω * x + φ_0))
Γ: (d - A, h)
Δ: (d + A, h)
b = Segment(Γ, Δ)
κείμενο1: "φ_0 =π/" + (π / φ_0) + ""
U_x = If(-A < x < A, 0.5 * ω^(2) * x^(2))
E_x = If(-A < x < A, 0.5 * ω^(2) * A^(2))
K_x(x) = E_x(x) - U_x(x)
a = OrthogonalLine(Α, xAxis)
K_. = Intersect(K_x, a, (0, 44.41321980490211))
B = Intersect(E_x, a, (0, 44.41321980490211))
C = Intersect(U_x, a, (0, 0))
c = false
e = true
f = false