$n=<>;
@a=glob<>;
for$i(1..$n*2-4){
	for$p(0..$n-1){
		$q=$i-$p;
		if($p<$q&&$q<$n&&$a[$p]>$a[$q]){
			@a[$p,$q]=@a[$q,$p]
		}
	}
}
print"@a"