Aufgabe:
Lösung:

Für Maxima Online braucht es einen anderen Algorithmus:
http://maxima-online.org/?inc=r776732458
Code 01:
c:325;
og:floor(sqrt(c^2/2));
for a:1 thru og do block( b:sqrt(c^2-a^2), if b=floor(b) then disp([a,b,c]) );
Code 02:
c:325;
og:floor(sqrt(c^2/2));
for a:1 thru og do block( b:sqrt(c^2-a^2), if is(integerp(b)) then disp([a,b,c]) );