for i=3to 100for j=3to 5e3k=(i*i+j*j)^.5
if k=int(k)?i,j,k
next:next