while true
  n,r = gets.split(" ").map{|i| i.to_i}
  break if (n==0 && r==0)
    
  s = 0
  field =Array.new(1000){Array.new(1000){0}}

  for i in 0..n-1
    x1,y1,x2,y2 = gets.split(" ").map{|j| j.to_i}
    for y in y1..y2-1
      for x in x1..x2-1
        (field[y][x] = 1 ; s+=1) if field[y][x]==0
      end
    end
  end
  puts s
  puts s if r==2
end