for 0..499999 {$/=$_%4950;my$c=(($!=$_ div 4950)*$!+$/*$/)**.5;$!>$c%1==0 <$/&&say "$! $/ $c"}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page