program y56
    implicit none
    real::P
    integer(8)::D

    read(5,*)D,P

    P=(P+100)/100
    D=int(real(D)*P)
    print'(i0)',D
    
end program y56