t="1":"0":t f=t:tail t:f main=interact(\a->let[x,y]=map read$words a in(++"\n").unwords.take y=<<take x f)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page