-module m.
-export [m/0].
m()->io:format("1\n0\n"),s(2,0,1).
s(51,_,_)->ok;s(N,I,J)->M=(N-1)*(I+J),io:format("~p~n",[M]),s(N+1,M,I).