-module(d).
-export([m/0]).
m()->[io:format("N=~p,A=~p
",[N,lists:min([N div 11+11,N+1])div 2])||N<-lists:seq(1,99)].