var

a,b,m,n,k:longint;

i,ans,p,j:longint;

begin

read(a,b,k,n,m);

ans:=1;j:=2;

for p:=m to k do begin

i:=p;

while(j<=m+1)and(i mod j=0)do begin i:=i div j;inc(j)end;

ans:=((ans*i))mod 10007;

end;

for i:=1 to m do ans:=(ans*b)mod 10007;

for i:=1 to n do ans:=(ans*a)mod 10007;

write(ans);

end.