m:- \I,\J,format("~|~`0t~d~2+",[I*J]),\+(J<9->put(32);nl);nl,write(2025). \I:-between(1,9,I).
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page