program main
    implicit none
    real p, a, n
    read(*,*) p
    a = 1/(1-p)
    write(*,*) a-1
end program main