-module(n). -export([m/0]). m()->{_,[X]}=io:fread('',"~d"),[io:format("~p~c",[N,f(N,0,0)])||N<-lists:seq(1,X)]. f(N,M,L)->if N32;N>M->f(N,M+L,L+1);0<1->10end.