\(\text{Solution}\)
一看数据范围就觉得一定是 \(\text{DP}\)。
显然有 \(f[i][j][k]\) 表示在第 \(i\) 场，主队赢了 \(j\) 局，客队赢了 \(k\) 局。然后有个比较经典的优化：因为只要求 \(j>k\) 的状态，设 \(f[i][j]\) 表示在第 \(i\) 场，主队赢的局数比客队多 \(j\) 局，状态转移方程（设 \(p1,p2\) 分别为主队/客队获胜概率）：
\[f[i][j]=f[i-1][j]\times [(p1\times p2)+(1-p1)\times(1-p2)]+f[i-1][j+1]\times (1-p1)\times p2+f[i-1][j-1]\times p1\times (1-p2)
\]
然后我就优化不动了，连矩阵加速这么离谱的做法都想了一会，死磕了很久。
考试后发现老师的 \(n^2\) 做法和我的不一样：直接暴力选 \(j,k\)，和之前 \(n^3\) 的 \(\text{DP}\) 的 \(j,k\) 一样，选了之后算出概率再乘一个组合数：
\[ans=\sum_{j=1}^{n} p1^{j}\times(1-p1)^{n-j}\times \text C(n,j)\times \sum_{k=0}^{j-1} p2^k \times (1-p2)^{n-k}\times \text{C}(n,k)
\]
看上去非常之暴力，但是你会发现后面的那个求和可以用一个 \(tmp\) 之类的存起来。
注意只能开一个 \(1e7\) 的数组，发现组合数递推其实只要逆元数组就够了。
然后有些情况需要特判。
\(\text{Summary}\)
有的时候一道题有很多个看上去很暴力的做法，但是很好优化，所以当优化不动的时候，
建议回炉重造。
\(\text{Code}\)
#include <cstdio>
#define rep(i,_l,_r) for(register signed i=(_l),_end=(_r);i<=_end;++i)
#define fep(i,_l,_r) for(register signed i=(_l),_end=(_r);i>=_end;--i)
#define erep(i,u) for(signed i=head[u],v=to[i];i;i=nxt[i],v=to[i])
#define efep(i,u) for(signed i=Head[u],v=to[i];i;i=nxt[i],v=to[i])
#define print(x,y) write(x),putchar(y)
template <class T> inline T read(const T sample) {
T x=0; int f=1; char s;
while((s=getchar())>'9'||s<'0') if(s=='-') f=-1;
while(s>='0'&&s<='9') x=(x<<1)+(x<<3)+(s^48),s=getchar();
return x*f;
}
template <class T> inline void write(const T x) {
if(x<0) return (void) (putchar('-'),write(-x));
if(x>9) write(x/10);
putchar(x%10^48);
}
template <class T> inline T Max(const T x,const T y) {if(x>y) return x; return y;}
template <class T> inline T Min(const T x,const T y) {if(x<y) return x; return y;}
template <class T> inline T fab(const T x) {return x>0?x:-x;}
template <class T> inline T gcd(const T x,const T y) {return y?gcd(y,x%y):x;}
template <class T> inline T lcm(const T x,const T y) {return x/gcd(x,y)*y;}
template <class T> inline T Swap(T &x,T &y) {x^=y^=x^=y;}
const int mod=1e9+7,maxn=1e7+5;
int n,p1,p2,ip1,ip2,ans,tmp,pre1=1,pre2=1,InvIp1,InvIp2,tmp1,Temp,C,Inv[maxn],tmp2;
inline int qkpow(int x,int y) {
int r=1;
while(y) {
if(y&1) r=1ll*r*x%mod;
x=1ll*x*x%mod; y>>=1;
}
return r;
}
inline int inv(int x) {
return qkpow(x,mod-2);
}
void init() {
Inv[1]=1;
rep(i,2,n) Inv[i]=1ll*(mod-mod/i)*Inv[mod%i]%mod;
}
int main() {
n=read(9); init();
p1=1ll*read(9)*inv(read(9))%mod; ip1=(1-p1+mod)%mod; InvIp1=inv(ip1);
p2=1ll*read(9)*inv(read(9))%mod; ip2=(1-p2+mod)%mod; InvIp2=inv(ip2);
if(p2==0) return print((1ll-qkpow((1ll-p1+mod)%mod,n)+mod)%mod,'\n'),0;
if(p1==1) return print((1ll-qkpow(p2,n)+mod)%mod,'\n'),0;
tmp1=qkpow(ip1,n-1); C=1; tmp2=qkpow(ip2,n);
rep(i,1,n) {
pre1=1ll*pre1*p1%mod;
tmp=(tmp+1ll*C*pre2%mod*tmp2%mod)%mod;
C=1ll*C*Inv[i]%mod*(n-i+1)%mod;
ans=(ans+1ll*C*pre1%mod*tmp1%mod*tmp%mod)%mod;
tmp1=1ll*tmp1*InvIp1%mod;
pre2=1ll*pre2*p2%mod;
tmp2=1ll*tmp2*InvIp2%mod;
}
print(ans,'\n');
return 0;
}
