use proconio::{input, marker::Usize1};

#[proconio::fastout]
fn main() {
    input! {
        n: usize,
        q: usize,
        a: [usize; n],
        l_r_k: [(Usize1, Usize1, usize); q],
    }

    for &(l, r, k) in &l_r_k {
        let mut result = 0;

        for i in l..=r {
            if a[i] % k == 0 {
                result += 1;
            }
        }

        println!("{}", result);
    }
}