Goldbach partition by sugyan

//,grep!($'%$_),2..$_-1or push@p,$_ for 3..300;//,map{$a[$'+$_].=" $'+$_"if$'<=$_}@p for@p;print$_*2,":",$a[$_*2],$/for 3..150

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

download

return to the top page