program main
  implicit none
  character*6::s
  integer::v,t
  read *,S,t
  read (S(3:6),*) v
  print '(i0)', v*t/10000
end program main