Euclids orchard by kaki

main=do x<-readLn;mapM putStrLn[map((" t"!!).div 1.gcd i)[1..x]|i<-[1..x]]

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

download

return to the top page