# Bremsweg

## Problembeschreibung

******************************************
Dokumentnummer: D1073
Quelle: Johann Weilharter,
             Physik
******************************************

Ein PKW macht eine Notbremsung. Wenn man die Reaktionszeit und
die sogenannte Bremsverzögerung nicht berücksichtigt, dann ist der
Bremsweg s=v²/2a

v ist die Anfangsgeschwindigkeit in m/s
a ist die Bremsverzögerung:
a = 7,5 m/s² -> trockene Fahrbahn
a = 5,5 m/s² -> nasse Fahrbahn
a = 1    m/s² -> eisige Fahrbahn

Erstelle ein Programm, welches nach Eingabe des Straßenzsutandes
(trocken, nass oder eisig)und der Anfangsgeschwindigkeit in km/h
den Bremsweg ausrechnet und ausgibt. 

## Problemlösung

EINGABE

strassenzustand:read("Gib den Strassenzustand ein");

VERARBEITUNG (Zuweisung der Bremsverzögerung)

if strassenzustand=trocken then ev(a:7.5)$

if strassenzustand=nass then ev(a:5.5)$

if strassenzustand=eisig then ev(a:1)$

EINGABE

v:read("Gib die Geschwindigkeit in km/h ein");

VERARBEITUNG

v:v*1000/3600.0;

v:floor(v*1000+0.5)/1000.0;

s:v**2/(2*a);

s:floor(s*1000+0.5)/1000.0;

AUSGABE

print("Der Bremsweg ist",s,"m bei einer Verzögerung von",a,"m/s²")$