open Batteries
open Printf
let () =
  let h,w = Scanf.scanf "%d %d " (fun a b -> a,b) in
  let s_l = Array.to_list @@ Array.init h (fun _ -> Scanf.scanf "%s " (fun a -> a)) in

  let rec aux n res = 
    if n = 0 then res else
      aux (n-1) ("#" ^ res)
  in
  print_endline @@ aux w "##";

  List.iter (fun x -> print_string "#";
              print_string x;
              print_endline "#";
            ) s_l;

  print_endline @@ aux w "##"
