open Int64 let () = let n = read_int () in let nums = Array.init n (fun _ -> Scanf.scanf "%Ld\n" (fun a -> a )) in Array.fold_left (Int64.add) (0L) nums |> Printf.printf "%Ld\n"