#![allow(non_snake_case, unused_imports)]

use proconio::{input, marker::Usize1, marker::Chars};
use itertools::Itertools;

#[allow(unused_macros)]
macro_rules! d {
    ( $( $x:expr ),* $(,)? ) => {
        eprintln!(
            concat!( $( stringify!($x), "={:?} " ),* ),
            $( $x ),*
        );
    };
}

fn main() {
    input! {
        S: String,
    }

    let f = |s: &String| {
        if s.len() > 32 { return false; }
        if let Some(c) = s.chars().nth(0) {
            if c == '_' || c == '-' { return false; }
        }

        for c in S.chars() {
            if !(c.is_alphanumeric() || c == '_' || c == '-') { return false; }
        }

        true
    };

    let ans = f(&S);
    println!("{}", if ans { 200 } else { 400 });
}