h,w=$<.map &:to_i
puts ?**w,[?*+' '*(w-2)+?*]*(h-2),?**w