$n=<>;$r="."x2x$n;@a=("Easterhegg"x10x$n**2)=~/$r/g;print(1137>>$_-8&1?" "x2x$n:@a[$i++],$_%5?"":"\n")for map{(5*$_+1..5*$_+5)x$n}0..4