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

    READ *, D, P
    PRINT *, INT(D + D * P / 100)
END PROGRAM MAIN