print"*"x($n-abs($_))."\n"for -($n=<>)..$n