import Data.List import Text.Printf main=mapM(printf"%.6f\n").take 300.nub$sort[sqrt$x^2+y^2|x<-[1..30::Double],y<-[0..x]]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page