Table of divisors by 51b

-module(t).
-export([m/0]).
m()->{_,[N]}=io:fread('',"~d"),A=lists:seq(1,N),F=format,[io:F("~p:1~s
",[M,tl([io_lib:F(" ~p",[L])||L<-A,M rem L<1])])||M<-A].

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

download

return to the top page