main=do x<-readLn;mapM(\b->putStrLn[" t"!!div 1(gcd a b)|a<-[1..x]])[1..x]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page