print$a=" "."  ##"x($n=<>),"
 ",($c="#"."   #"x--$n."
")x4," $c$a"