meta data for this page
  •  

This is an old revision of the document!

Besenstiel -- gruppe334

Der Versuch wurde durchgeführt von: Jari Reuker und Pascal Mazarin
Die Wiki-Seite wurde angelegt am: 17 December 2020 23:09

Ab hier fängen die Hinweise an, die noch zu löschen sind!

Diese Seiten

Hinweise für die Formatierung ihres Versuchsberichts mit Latex

Simulationsprogramm (Mathematica)

Wir haben das Programm mit Mathematica geschrieben, doch der Upload des Programms als Notebook ist uns im Wiki leider nicht möglich, wie auch die ursprünglich verwendeten griechischen Buchstaben, die wir zu ihren lateinischen Versionen (t,f,w,a) abgeändert haben. Da auch der anzubietende Programm-Download als .nb-Datei nicht funktioniert, muss man sich das Programm leider als Textdatei herunterladen und diesen dann in Mathematica kopieren und ausführen. Zu diesem Zwecke haben wir alle Textfenster durch Mathematica-Kommentare ersetzt, auch wenn es etwas unschön ist.

kippenderbesenstiel_334.txt
t := Sqrt[(2 L)/(3 g)];
g = 9.81;
L = 1.45;
 
(*Simulationsprogramm*)
sim[f0_, w0_, d_] :=
 Module[{f = f0, w = w0, n = 0},
  While[f < Pi/2, a = Sin[f]/t^2; w = w + a*d; f = f + w*d; n++;];
  Return[n*d](*Kippzeit*)]
 
(*Einfluss der Zeitschritte*)
Print["Kippzeit für Startwinkel 0,25rad,d=1ms: T = ", 
 sim[0.25, 0.0, 
  0.001]]; 
Print["Kippzeit für Startwinkel 0,25rad,d=10ms: T = ", 
 sim[0.25, 0.0, 0.01]];
Print["Kippzeit für Startwinkel 0,25rad,d=50ms: T = ", 
  sim[0.25, 0.0, 0.05]];
Print["Kippzeit für Startwinkel 0,25rad,d=0,5s: T = ", 
  sim[0.25, 0.0, 0.5]];
 
ListPlot[Table[sim[i*0.01, 0, 0.01], {i, 120}],
 PlotLabel -> 
  "Simulation der Kippzeiten für verschiedene Anfangswinkel 
  bei L=1,45m simuliert in Zeitschritten von d=10ms",
 DataRange -> {0, 1.2}]
 
ListPlot[Table[sim[i*0.01, 0, 0.05], {i, 120}],
 PlotLabel -> 
  "Simulation der Kippzeiten für verschiedene Anfangswinkel 
  bei L=1,45m simuliert in Zeitschritten von d=50ms",
 DataRange -> {0, 1.2}]
 
 
 
(*Jetzt lassen wir uns die theoretischen Werte für unsere Messwerte \
numerisch berechnen*)
L = 1.28;
sim[0.17, 0.0, 0.01]
L = 1.28;
sim[0.35, 0.0, 0.01]
L = 1.28;
sim[0.52, 0.0, 0.01]
L = 1.28;
sim[0.7, 0.0, 0.01]
L = 1.28;
sim[0.87, 0.0, 0.01]
L = 1.28;
sim[0.96, 0.0, 0.01]

Bilder einbinden

Ihr Versuchsaufbau sollte so beschrieben sein, dass er für sich stehend verständlich ist - gerne mit einem Foto.

Ein Bild laden Sie ins Wiki, indem Sie im Editor in der Knopfleiste auf den kleinen Bildrahmen klicken. In einem neuen Fenster öffnet sich ein Dialog mit einem Dateibaum. Dort navigieren Sie zu “Ihrer” Baustelle (a_mechanik:kippender_besenstiel:gruppenseiten:gruppe334). Anschließend nutzen Sie den Dialog auf der rechten Seite, um Ihr Bild hochzuladen. Mit einem Klick auf die Zeile ihres Bildes erzeugen Sie im Hauptfenster einen Befehl, der das Bild lädt.

Im einfachsten Fall landet ein Bild direkt an der Stelle im Text, an der Sie es eingefügt haben (Siehe de:wiki:syntax#bilder_und_andere_dateien. Hier gibt es einen Überblick, was sonst noch möglich ist.

Tabellen

Für eine Stablänge von 1,28m erhalten wir folgende Fallzeiten (in der ersten Zeile ist der Kippwinkel im Bogenmaß angegeben):

0,17 0,35 0,52 0,7 0,87 0,96
1.145 0,729 0,609 0,438 0,378 0,331
1.253 0,699 0,578 0,448 0,34 0,273
1.283 0,758 0,611 0,451 0,321 0,321
1.119 0,797 0,593 0,443 0,333 0,287
1.130 0,716 0,579 0,474 0,363 0,32

Unter Einfluss der Luftreibung erhalten wirfür eine Länge von l=1,28m folgende Fallzeiten:

0,17 0,35 0,52 0,7 0,87 0,96
1,372 0,883 0,663 0,59 0,416 0,336
1,409 0,837 0,671 0,645 0,444 0,373
1,59 0,889 0,721 0,58 0,462 0,377
1,526 0,861 0,675 0,598 0,401 0,401
1,578 0,863 0,721 0,62 0,456 0,437

Syntax und Funktionen im Wiki

Hier noch Links zu

You could leave a comment if you were logged in.