Cross Product of two Strings by pooq

c:charlist;thru 100 do([a,b]:split(?read\-line()," "),s:"",for i in c(a)do for j in c(b)do(printf(?t,"~a~a~a",s,i,j),s:" "),newline());

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

download

return to the top page