Pythagorean triple by twobit

for(_)in range(5e5):
 b=_%4901;_/=4901;c=(_*_+b*b)**.5
 if+c%1==0<_*b:print+_,b,"%d"%c

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top