read the data by yuki

g[]=[]
g(',':s)=", "++g s
g(a:s)=a:g s
r=readLn
f x=do i<-r;mapM(\_->x)[1..i]
main=f(f r)>>=putStr.g.show

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

To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)

download

return top