#encoding: utf-8

a = %w(
大きさ  60cm以内    80cm以内    100cm以内   120cm以内   140cm以内   160cm以内
重さ    2kg以内     5kg以内     10kg以内    15kg以内    20kg以内    25kg以内
料金    600円   800円   1000円  1200円  1400円  1600円
).map(&:to_i).each_slice(7).to_a.transpose[1..-1]

loop do
    n = gets.to_i
    break if n == 0
    total = 0
    n.times do
        x, y, z, w0 = gets.split.map &:to_i
        s0 = x + y + z
        #p [s0, w0]
        total += (a.find{|s, w, _| s >= s0 && w >= w0} || [0]).last
    end
    p total
end