func main()
	var v: int :: cui@inputStr().split(".")[1].toInt(&)
	var t: int :: cui@inputInt()
	var ans: int :: v * t / 10000
	do cui@print("\{ans}\n")
end func