-module(t). -export([m/0]). m()->{_,[N]}=io:fread('',"~d"),[io:format("~p:1~s ",[M,tl([io_lib:format(" ~p",[L])||L<-lists:seq(1,M),M rem L<1])])||M<-lists:seq(1,N)].
Note that non-ascii characters in the above source code will be escaped (such as \x9f).