for(a,3,100,for(b,3,a*a/2,c:=(a*a+b*b)sqrt;c%1>0or writeln(a," ",b," ",c)))