-module(p). -export([m/0]). m()->{_,[N]}=io:fread('',"~d"),L=lists:seq(-N,N),[io:format([42-(X*X+Y*Y-1)div(N*N)*10||Y<-L]++" ")||X<-L].