Scanf.scanf "%d %d" (fun a b ->
    if a mod 100 = 0 && b mod 100 = 0 then
        Printf.printf "%d\n" (a * b / 10)
    else
        let q = a * b in
        if q >= -99999999 && q <= 99999999 then Printf.printf "%d\n" q
            else print_endline "E"
)