Start

Neu

Stopp

Höhe

P 

10

1

h0 = 125 (slider from -5 to 200)
yWerte = Sequence((0, i), i, 0, 125)
s(t) = (5 * t^(2))
t = 0 (slider from 0 to 5, step 0.05)
h(t) = h0 - s(t)
yM(t) = If[h(t) ≥ 0, h(t), 0]
P: (t, yM(t))
Eingabefeld1 = Textfield(h0)
M: (-0.5, yM(t))
A = If(IsInteger[t], M, (-0.5, h0))
xFolge = Sequence((i, 125), i, 0, 5)
xVektor = Vector((0, 125), (6, 125))
yVektor = Vector((0, 125), (0, -8))
yFolge = Sequence((0, 125 - (10 * i)), i, 1, 12)
T: (t, 125)
Text1: "t = " + (x(T)) + ""
Y = Point(yWerte)
f = Segment(Y + (-1, 0), Y + (1, 0))
Text5: "" + (125 - y(Y)) + ""