{ll@n;Mint@p,s,r,a,b=1;rep(n)s+=a,r+=s*a,(a,b)=(b,a+b*p);wt(r);}