f:=method(n,for(a,x:=2,n/2,n%a>0or x=0);x) for(i,6,300,2,write(i,":");for(j,3,i/2,f(j)*f(i-j)<1or write(" ",j,"+",i-j));" "print)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page