#[macro_export]
macro_rules! setup {
    { mut $input:ident: SplitWhitespace $(,)? } => {
        use std::io::Read;
        let mut buf = String::new();
        std::io::stdin().read_to_string(&mut buf).unwrap();
        let mut $input = buf.split_whitespace();
    };
}

#[macro_export]
macro_rules! parse_next {
    ($str_iter:expr) => {
        $str_iter.next().unwrap().parse().unwrap()
    };
}

fn main() {
    setup! { mut input: SplitWhitespace };

    let n: usize = parse_next!(input);

    let mut ans = 0;
    for x in 1..=(n - 1) {
        let y_f = ((n as f64).powi(2) - (x as f64).powi(2)).sqrt();
        if y_f.trunc() == y_f {
            ans += 1;
        }
    }

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