let () =
    let calc a =
        if a mod 15 = 0 then 8 else
        if a mod 5 = 0 then 4 else
        if a mod 3 = 0 then 4 else
            if a >= 100 then 3 else
                if a >= 10 then 2 else 1
    in
    let a = Array.init 5 (fun _ -> Scanf.scanf " %d" calc) in
    Printf.printf "%d\n" @@ Array.fold_left (+) 0 a