- π

-  π/2

0

π/2

π

t =

φ_0 =

01-Schwingungen

Version Stand
09.11.2021
Andreas Jäger

Stand

T = 2.150372714648242 (slider from 0 to 7, step 0.01)
t: 0
phi0: 0
w: (2 * π / T)
A = 5 (slider from 0 to 5, step 0.001)
f(x) = If[x ≥ 0, (A * sin((w * x) + phi0))]
Pt: (t, f(t))
P0t: (0, f(t))
P0: 0
PA: (0, A)
Eingabefeld1 = Textfield(t)
Eingabefeld2 = Textfield(phi0)
f2(x) = If[x ≤ t, f(x)]
g = Segment(P0t, Pt)
L: (2 * π / w)
l = Segment((0, 0), (L, 0))
Text2: "T = " + (LaTeX[l]) + "\ s"
a = false
Text1: "φ_0 =  " + (LaTeX[If[phi0 ≟ -3.1415, "-\pi→", If[phi0 ≟ -3.1415 / 2, "-{\pi\over 2}→", If[phi0 ≟ 0, "0 →", If[phi0 ≟ 3.1415 / 2, "{\pi\over 2} →", If[phi0 ≟ 3.1415, "\pi →", Text[phi0 / π] + "\ \pi"]]]]]]) + " " + (LaTeX[If[phi0 ≟ -3.1415 ∨ phi0 ≟ 3.1415, "f(x) = - Sin(ω t)", If[phi0 ≟ -3.1415 / 2, "f(x) = - Cos(ω t)", If[phi0 ≟ 0, "f(x) = Sin(ω t)", If[phi0 ≟ 3.1415 / 2, "f(x) = Cos(ω t)", ""]]]]]) + "  "
PT: (T, 0)
Text5: "A = " + A + " cm"