n = $stdin.gets.chomp.to_i
arr = gets.chomp.split(' ').map(&:to_i)
mon = 1000;kab = 0
$ans = 1000

def sokode_uru(mon,kab,arr_in)
  mon += kab * arr_in[0]
  kab = 0
  if mon > $ans
    $ans = mon
  end
  min = arr_in[0]
  arr_in.length.times do |k1|
	if min > arr_in[k1]
      sokode_kau(mon,kab,arr_in[k1..(-1)])
      min = arr_in[k1]
    end
  end
end

def sokode_kau(mon,kab,arr_in)
  kab += mon / arr_in[0]
  mon -= kab * arr_in[0]
  max = arr_in[0]
  arr_in.length.times do |k2|
	if max < arr_in[k2]
      sokode_uru(mon,kab,arr_in[k2..(-1)])
      max = arr_in[k2]
    end
  end
end

min = arr[0]
 n.times do |k3|
	if min >= arr[k3]
      sokode_kau(mon,kab,arr[k3..(-1)])
      min = arr[k3]
    end
  end
puts $ans