Toggle navigation
?
users online
Logout
Open hangout
Open chat for current file
p(N):-q(N,2). q(N,X):-N=0;Y is X+1,(A is X-1,\+ (between(2,A,B),0is X mod B),writeln(X),M is N-1;M=N),q(M,Y).