NABEATSU of the world by Grumzik

m:-between(1,300,X),w(X,A),write(A),nl,fail.\x0d
w(X,aho):-X mod 3=:=0,!;number_chars(X,L),member('3',L),!.\x0d
w(X,X).

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

download

return to the top page