PROGRAM MAIN
    IMPLICIT NONE
    REAL(16) :: D, P

    READ *, D, P
    PRINT *, INT(D * (P * 0.01 + 1))
END PROGRAM MAIN