# Rechtwinkeliges Dreieck

## Problembeschreibung

******************************************
Dokumentnummer: D1090
Quelle: http://www.reniets.at
******************************************

Gegeben sei ein rechtwinkeliges Dreieck. Gesucht sind
die Seite b, die Winkel und die Fläche.

## Problemlösung

EINGABE

a:read("Gib die Seite a ein");

c:read("Gib die Seite c ein");

VERARBEITUNG

b:sqrt(c**2-a**2);

g:sin(%alpha)=a/c;

l:solve(g,%alpha);

l:l,numer;

%alpha:floor(rhs(l[1])*10000+0.5)/10000.0;

alpha:%alpha;

%alpha:%alpha*180/%pi;

%alpha:%alpha,numer;

%alpha:floor(%alpha*10000+0.5)/10000.0;

%beta:90-%alpha;

g:cos(alpha)=b1/c;

l:solve(g,b1);

l:l,numer;

b1:floor(rhs(l[1])*10000+0.5)/10000.0;

A:a*b/2.0;

ergebnis:matrix(
 ["a","=",a], 
 ["b","=",b], 
 ["c","=",c], 
 ["A","=",A], 
 ['%alpha,"=",%alpha], 
 ['%beta,"=",%beta]
);

AUSGABE

print("Hier sind die Ergebnisse:",ergebnis)$