let hoge = 10000.0 let v,t = let tmp = stdin.ReadLine().Split() |> Array.map(float) tmp.[0]*hoge,tmp.[1] v*t/hoge |> int |> printfn "%i"