main=do
    [d,p]<-getLine>>=return.map(read::String->Integer).words
    print$d*(100+p)`div`100