Sphenic Numbers by tabasa

z=[2];r=[2];y=[]\x0d
65.times{|i|r<<i*2+3}\x0d
r.length.times{|i|\x0d
 f=0\x0d
 (i/2+1).times{|w|f=1if r[i]%(w+2)==0}\x0d
 z<<r[i]if f==0\x0d
}\x0d
l=z.length\x0d
l.times{|i|\x0d
 (l-i-1).times{|j|\x0d
  (l-i-j-2).times{|k|\x0d
   y<<z[i]*z[i+j+1]*z[i+j+k+2]\x0d
}}}\x0d
y.sort!.uniq!\x0d
100.times{|i|puts y[i]}

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

download

return top