var i,j:word;begin for i:=1to 12do for j:=1to 12do write(i*j:4-2shr j,^j:j div 12)end.
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page