-module(s). -export([m/0]). m()->S=lists:seq(2,762),[io:format("~p~n",[X])||X<-S,7==lists:sum([1||M<-S,X rem M<1,X rem(M*M*M)>0])].
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page