Y:=(stdin upTo:$ )asNumber. X:=stdin nextLine asNumber. 0to:-1+Y do:[:y|1to: X do:[:x|Z:=$ .x=X or:[Z:=$ ].stdout<<(x+y\\2)<<Z]]!
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page