let i() = stdin.ReadLine().Split(' ') |> Array.map int let a = i()|> function | [|a;b;_|]-> a*b | _ -> failwith "" let b = i() |> Array.sum if b > a then -1 else a-b |> printfn "%d"