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