use core::cmp::{max, min};
use proconio::input;

fn main() {
    input! {
        n: i32,
        x: [i32; n],
        q: i32,
        ques: [(i32, i32, i64); q],
    }

    let mut count_same = vec![0; n as usize];
    for i in 0..(n - 1) {
        count_same[(i + 1) as usize] = count_same[i as usize]
            + if x[i as usize] == x[(i + 1) as usize] {
                1
            } else {
                0
            }
    }

    const MAX_K: i32 = 70;

    let mut freq = vec![0; (n + 1) as usize];

    for (l, r, s) in ques {
        let l = l - 1;

        let dist = r - l;

        if dist <= 62 && 1i64 << (dist - 1) <= s {
            println!("-1");
            continue;
        }

        let same = count_same[(r - 1) as usize] - count_same[l as usize];

        if 61 <= same || s < (1i64 << same) {
            println!("0");
            continue;
        }

        let mut dp_sum = vec![0i128; min(300, (dist + 1 + 1)) as usize];

        let mut lw = 1;
        let mut up = MAX_K;

        while up - lw > 1 {
            
            let k = (lw + up) / 2;

            dp_sum[0] = 0;
            dp_sum[1] = 1;

            let mut left = l;
            let mut vis_count = 0;

            let mut over = false;            
            for i in l..r {
                if freq[x[i as usize] as usize] == 0 {
                    vis_count += 1;
                }
                freq[x[i as usize] as usize] += 1;
                while vis_count == k + 1 {
                    freq[x[left as usize] as usize] -= 1;
                    if freq[x[left as usize] as usize] == 0 {
                        vis_count -= 1;
                    }
                    left += 1;
                }

                let dp = dp_sum[(i + 1 - l) as usize] - dp_sum[(left - l) as usize];
                if dp > s as i128 {
                    for j in l..i + 1 {
                        freq[x[j as usize] as usize] = 0;
                    }
                    over = true;
                    break;
                }
                dp_sum[(i + 1 - l + 1) as usize] =
                    dp_sum[(i + 1 - l) as usize] + dp;
            }
            
            if !over {
                for i in l..r {
                    freq[x[i as usize] as usize] = 0;
                }
                lw = k;
            } else {
                up = k;
            }
        }
        println!("{}", lw);
    }
}