f:=method(m,$,if(m>0,for(!,1,3,writeln($,!);f(m-1," "..$..!..".")))) f(File standardInput readLine asNumber,"")
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page