fn main(){
  let nm: Vec<usize> = read_vec();
  let n = nm[0];
  let m = nm[1];

  let mut sm: Vec<Vec<i64>> = vec![vec![0;m+1]; m+1];
  
  for i in 1 .. m+1 {
    let d: Vec<i64> = read_vec();
    for j in 1 .. m+1 {
      sm[i][j] = sm[i-1][j] + sm[i][j-1] - sm[i-1][j-1] + d[j-1]
    }
  }
  
  for _ in 0 .. n {
    let mut cnt: u32 = 0;
    let xy: Vec<usize> = read_vec();
    for i in xy[0] .. m+1 {
      for j in xy[1] .. m+1 {
        for k in 0 .. xy[0] {
          for l in 0 .. xy[1] {
            if sm[i][j] - sm[k][j] - sm[i][l] + sm[k][l] == 0 {cnt += 1;}
          }
        }
      }
    }
    println!("{}", cnt);
  }
  
  
}

fn read_vec<T>() -> Vec<T>
  where T: std::str::FromStr,
        T::Err: std::fmt::Debug
{
  let mut buf = String::new();
  std::io::stdin().read_line(&mut buf).expect("failed to read");
  buf.split_whitespace().map(|e| e.parse().unwrap()).collect()
}