<<

Stroboskop

>

<<>

∥

v =

a =

t =

1

2

3

Tabelle

0

2

4

6

8

10

12

14

16

18

20

Skalierung

Test

Messungen mit der Stoppuhr

Version Stand
23.11.2022
Andreas Jäger

Info

Δ x = 2,0 m

{x\over m}

a = 0 (slider from 0 to 1, step 0.001)
t = 22 (slider from 0 to 22, step 0.001)
v = 1.75 (slider from 0 to 4, step 0.001)
lv: 20
s0: 0
S0: (s0, 0)
s: s0 + (v * t) + ((1 / 2 * a) * t^(2))
S: ((v * t), 0)
ss = Segment(S - (0, 1), S + (0, 1))
mods = Mod(s, 2)
bs = If(mods < 0.05, true, false)
P0: (0, 0)
P2: (4, 0)
P3: (6, 0)
P4: (8, 0)
P5: (10, 0)
P6: (12, 0)
P7: (14, 0)
P1: (2, 0)
xv: (v * t) + ((1 / 2 * a) * t^(2))
bs2 = false
tMax: ((-v) + sqrt((40 * a) + v^(2))) / a
A: (28, 6)
bTab = true
Eingabefeld1 = Textfield(v)
Eingabefeld2 = Textfield(a)
Eingabefeld3 = Textfield(t)
auf: 1
bTab2 = false
l2 = Sequence(Segment[(i, -2), (i, 3)], i, 0, 20, 1)
bSkal = true
k = Segment((-2, 00), (20, 0))
u = Vector((20, 0), (30, 0))
ttt = 3.4 (slider from 0 to 10, step 0.1)
bs3 = false
b = false
Text2: "x\over m\cr
\cr " + (LaTeX[If[t ≥ 1 ∧ x(P1) ≤ 20, x(P1)]]) + "
\cr " + (LaTeX[If[t ≥ 2 ∧ x(P2) ≤ 20, x(P2)]]) + "
\cr " + (LaTeX[If[t ≥ 3 ∧ x(P3) ≤ 20, x(P3)]]) + "
\cr " + (LaTeX[If[t ≥ 4 ∧ x(P4) ≤ 20, x(P4)]]) + "
\cr " + (LaTeX[If[t ≥ 5 ∧ x(P5) ≤ 20, x(P5)]]) + "
\cr " + (LaTeX[If[t ≥ 6 ∧ x(P6) ≤ 20, x(P6)]]) + "
\cr " + (LaTeX[If[t ≥ 7 ∧ x(P7) ≤ 20, x(P7)]]) + ""
Text1: "t\over s\cr
\cr" + (LaTeX[If[t ≥ 2 / v ∧ x(P1) ≤ 20, 2 / v, "-"]]) + "
\cr" + (LaTeX[If[t ≥ 4 / v ∧ x(P2) ≤ 20, 4 / v, "-"]]) + "
\cr" + (LaTeX[If[t ≥ 6 / v ∧ x(P3) ≤ 20, 6 / v, "-"]]) + "
\cr" + (LaTeX[If[t ≥ 8 / v ∧ x(P4) ≤ 20, 8 / v, "-"]]) + "
\cr" + (LaTeX[If[t ≥ 10 / v ∧ x(P5) ≤ 20, 10 / v, "-"]]) + "
\cr" + (LaTeX[If[t ≥ 12 / v ∧ x(P6) ≤ 20, 12 / v, "-"]]) + "
\cr" + (LaTeX[If[t ≥ 14 / v ∧ x(P7) ≤ 20, 14 / v, "-"]]) + ""