-module(s). -export([m/0]). m()->L=lists:seq(2,763),[io:write(X)>io:nl()||X<-L,length([Y||Y<-L,X rem Y<1,X rem(Y*Y*Y)>0])==7].
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page