$n=<>+0;
for(reverse(1..$n)){
	print $n x$_,$/
}