# Gerade: Steigung und Achsenabschnitt

## Problembeschreibung

*******************************************
Dokumentnummer: D1536
*******************************************
Gegeben ist eine Gerade  in der Form f(x) = k*x + d
Bestimme
a) die Steigung k
b) den Achsenabschnitt d
c) den Winkel, den die Gerade mit der positiven Richtung
    der x-Achse einschließt

## Problemlösung

EINGABE

f:read("Gib eine lineare Funktion f(x):= ein");

VERARBEITUNG

koeff:bothcoeff(f(x),x);

k:koeff[1];

d:koeff[2];

g:tan(%alpha)=k;

l:solve(g,%alpha);

%alpha:ev(%alpha,l[1]);

%alpha:%alpha*180/%pi,numer;

%alpha:floor(%alpha*100+0.5)/100.0;

if %alpha < 0 then ev(%alpha:180+%alpha);

AUSGABE

print("Steigung k =",k)$

print("Achsenabschnitt d =",d)$

print("Eingeschlossener Winkel =",%alpha)$