Imports System

Module Program

    Sub Main(args As String())
        Dim iInput As String() = Console.ReadLine().Split(" ")
        Dim iA As Double = iInput(0)
        Dim iB As Double = iInput(1)

        Console.WriteLine(Math.Floor(iA * iB))
    End Sub
End Module
