# Rechtwinkelige Dreiecke generieren

## Problembeschreibung

******************************************
Dokumentnummer: D1544
******************************************
Es sollen rechtwinkelige Dreiecke mit ganzzahligen
Seiten erzeugt werden.
Mittel: Lehrsatz des Pythagoras

## Problemlösung

n:read("Gib die Obergrenze ein");

for a:1 thru n do
      for b:1 thru n do
           for c:1 thru n do
                 if c**2=a**2+b**2 then print(a,b,c);