func main()
	var N: int :: cui@input().toInt(&)
	var _: [][]char :: cui@input().split(" ")
	var a: []int :: #[N]int
	for i(0, N - 1)
		do a[i] :: _[i].toInt(&)
	end for
	var t: int
	var k: int
	switch(a[0])
	case (N - 1) * 2
		do t :: N - 1
		do t :+ a[0] = a.max() ?(1, 0)
		do k :+ a[0] = a.max() ?(0, 1)
	case (N - 1) * 4
		do k :: N - 1
		do k :+ a[0] = a.min() ?(1, 0)
		do t :+ a[0] = a.min() ?(0, 1)
	default
		for i(0, N - 1)
			do t :+ a[i] = a.max() ?(1, 0)
			do k :+ a[i] = a.min() ?(1, 0)
		end for
	end switch
	do cui@print("\{t} \{k}\n")
end func