n = gets.to_i
a = gets.split.map(&:to_i)
x = a[0]
1.upto(n - 1) do |i|
    tmp = [x * a[i], x + a[i], x - a[i]].max
    if a[i] != 0
        tmp = [tmp, x / a[i]].max
    end
    x = tmp
end
p x