Start Messung 1

Messung 1 löschen

Messung 1-->Tabelle

Start Messung 2

Messung 2 löschen

Messung 2 --> Tabelle

Messung 1

Messung 2

Start Messung 3

Messung 3 löschen

Messung 3 --> Tabelle

Messung 3

Zahl der Versuche:

Anleitung:   1. Klicke das Kästchen “Messung...” an.  2. Klicke auf den “Start”-Button. Ein Countdown von 5 Sekunden beginnt.  3. Klicke auf das Symbol in dem Quadrat. Danach erscheint sofort das nächste Symbol.  Die Zeit zwischen dem Anklicken zweier Symbole wird als Reaktionszeit gemessen.  4. Das Programm stoppt, wenn die vorgegebene Versuchszahl erreicht ist .  Das Programm zeigt dir den Boxplot in der rechten Grafik an. Das Kreuz steht  für das arithmetische Mittel der Messwerte.  5. Willst du eine Messung wiederholen, drücke auf “Messwerte aus Messung... löschen”.  Starte dann die Messung erneut.  6. Du kannst für jede Messung die Reaktionszeiten in die Tabelle eintragen..”

Anleitung:

0. Wähle die gewünschte Versuchszahl.
1. Klicke “Messung ...” an.
2. Klicke “ Messung ... löschen” an.
3. Klicke “Start Messung .. .” an. Es folgt ein Countdown von 5 Sekunden.
4. Klicke nun auf die angezeigten Symbole. 
    Gemessen werden die Zeiten zwischen zwei Klicks. 
5. Die gemessenen Zeiten werden in einem Boxplot angezeigt.
6. Das Kreuz steht für das arithmetische Mittel. 
7. Du kannst diese Zeiten (Spalten A, C, E) und auch die Abstände 
     der Symbole (Spalten B, D, F)  in die Tabelle übertragen.

VZ: 5
n = 6
Messwertroh3: {}
a: 0
Ende: {}
Zufallx = If(n ≤ VZ, RandomUniform[0, 1.8])
Zufally = If(n ≤ VZ, RandomUniform[0, 1.8])
Zeiten: {725.483, 726.587, 727.653, 729.22, 730.336, 731.836}
Messwertroh: {}
Messwert = Remove(Messwertroh, {Element[Messwertroh, 1]})
A = (0, 0)
B = Point(xAxis)
b: 5 - a
Text1: "" + b + ""
C = Point(yAxis)
D = (2, 2)
E = Point(xAxis)
F = Intersect(xAxis, yAxis)
f = PolyLine(C, D, E, F, C)
mittlereReaktionszeit = mean(Messwert)
medianReaktionszeit = Median(Messwert)
Limit = If(n < 120, false, true)
m: n - 1
Zeiten2: {17.045, 18.795, 20.202, 22.017, 23.455, 24.846, 25.955, 27.024, 28.915, 30.463, 32.338}
Ende2: {}
Messwertroh2: {}
Messwert2 = Remove(Messwertroh2, {Element[Messwertroh2, 1]})
e = false
h = false
Zufally2 = If(n ≤ VZ, RandomUniform[0, 1.8])
Zufallx2 = If(n ≤ VZ, RandomUniform[0, 1.8])
Ende3: {}
Zeiten3: {2741.087, 2742.352, 2743.445, 2744.507, 2745.492, 2746.507}
Zufally3 = If(n ≤ VZ, RandomUniform[0, 1.8])
Zufallx3 = If(n ≤ VZ, RandomUniform[0, 1.8])
i = false
Messwert3 = Remove(Messwertroh3, {Element[Messwertroh3, 1]})
O = Union(Messwert, Messwert2)
M = Union(O, Messwert3)
RandR = Max(M)
animation1: false
RandL = Min(M)
Eingabefeld1 = Textfield(VZ)
P_L: {}
Zufall = If(n ≤ VZ, (Zufallx, Zufally))
k: 0
P_L2: {}
Zufall2 = If(n ≤ VZ, (Zufallx2, Zufally2))
P_L3: {}
Zufall3 = If(n ≤ VZ, (Zufallx3, Zufally3))
v1, a_1, b_1, d_1, c_1 = Polygon(A, B, D, C)
c = BoxPlot(2, 1, Messwert, true)
d = BoxPlot(5, 1, Messwert2, true)
g = BoxPlot(8, 1, Messwert3, true)
Text2: "Messwerte: " + m + ""
reak: Element[Zeiten, n] - Element[Zeiten, n - 1]