 

|x|t|i|v|m|j|h|k|=|0|0|0.02|0|0.1|0.2|0.02|1|  

wiederhole bis f>5
a=(-(j*t)*x-k*sgn(v)*abs(x)+ 0.01*(sin(2*pi*t)+sin(4*pi*t)+sin(6*pi*t)+sin(8*pi*t)))/m
b=a+(a-A)/2
x=0.5*b*h*h+v*h+x
v=b*h +v
A=a
f=wrz(j*t/m)/2/pi
h=i/f
_f;x;;1
t=t+h
zurck
