# Rechtwinkeliges Dreieck

## Problembeschreibung

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

Gegeben sind die Seiten a und b eines rechtwinkeligen
Dreiecks. Gesucht sind die Seite c, die Fläche A und
die Winkel.

## Problemlösung

EINGABE

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

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

VERARBEITUNG

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

A:a*b/2.0;

g:tan(%alpha)=a/b;

l:solve(g,%alpha);

%alpha:rhs(l[1]);

%alpha:%alpha,numer;

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

%alpha:%alpha*180/%pi;

%alpha:%alpha,numer;

%beta:90-%alpha;

ergebnis:[["a","b","c","A",'%alpha,'%beta],[a,b,c,A,%alpha,%beta]];

zeile1:ergebnis[1];

spalte1:transpose(zeile1);

zeile2:ergebnis[2];

spalte2:transpose(zeile2);

ergebnis:[spalte1,spalte2];

AUSGABE

print(ergebnis)$