program aaa
implicit none
integer(8) :: i,j,k
double precision :: beauty,n,m,d
read(*,*) n,m,d

if(d == 0 ) then
	beauty = (m-1)/n
else
beauty =  (2 * (n-d) / n) ** (m-1)
endif
write(*,*) beauty

end program