main::IO() main = do (d:p:_)<-fmap (fmap read . words) getLine print (truncate $ (d*(100+p)/100) ::Integer)