Problem:
Sleeping Time

Miki is a high school student.
She has a part time job, so she cannot take enough sleep on weekdays.
She wants to take good sleep on holidays, but she doesn't know the best length of sleeping time for her.

She is now trying to figure that out with the following algorithm:

Begin with the numbers K, R and L.

She tries to sleep for H=(R+L)/2 hours.

If she feels the time is longer than or equal to the optimal length, then update L with H. Otherwise, update R with H.

After repeating step 2 and 3 for K nights, she decides her optimal sleeping time to be T' = (R+L)/2.

If her feeling is always correct, the steps described above should give her a very accurate optimal sleeping time.
But unfortunately, she makes mistake in step 3 with the probability P.

Assume you know the optimal sleeping time T for Miki.
You have to calculate the probability PP that the absolute difference of T' and T is smaller or equal to E.
It is guaranteed that the answer remains unaffected by the change of E in 10^{-10}.

Input

The input follows the format shown below

K R L

P

E

T

Where the integers 0 \leq K \leq 30, 0 \leq R \leq L \leq 12 are the parameters for the algorithm described above.
The decimal numbers on the following three lines of the input gives the parameters for the estimation. You can assume 0 \leq P \leq 1, 0 \leq E \leq 12, 0 \leq T \leq 12.

Output

Output PP in one line.

The output should not contain an error greater than 10^{-5}.

Sample Input 1

3 0 2
0.10000000000
0.50000000000
1.00000000000

Output for the Sample Input 1

0.900000

Sample Input 2

3 0 2
0.10000000000
0.37499999977
1.00000000000

Output for the Sample Input 2

0.810000

Sample Input 3

3 0 2
0.10000000000
0.00000100000
0.37500000000

Output for the Sample Input 3

0.729000

Sample Input 4

3 0 2
0.20000000000
0.00000100000
0.37500000000

Output for the Sample Input 4

0.512000

Solution in Ruby (judge verdict: Memory Limit Exceeded)

k, r, l = gets.split.map(&:to_i)
p = gets.to_f
e = gets.to_f
t = gets.to_f
h = 0
dp = Array.new(k+1).map{Hash.new}
dp[0][[r,l]] = 1
k.times do |i|
    dp[i].each do |k,v|
        h = (k[0].to_f + k[1].to_f)/2
        if h >= t
            dp[i+1][[k[0],h]] = v * (1 - p)
            dp[i+1][[h,k[1]]] = v * p
        else
            dp[i+1][[k[0],h]] = v * p
            dp[i+1][[h,k[1]]] = v * (1 - p)
        end
    end
end 
ans = 0
dp.pop.each do |k,v|
    h = (k[0].to_f + k[1].to_f)/2
    if h.between?(t - e, t + e)
        ans += v
    end
end
puts ans