一本通1644【例 4】佳佳的 Fibonacci

1644：【例 4】佳佳的 Fibonacci

时间限制: 1000 ms         内存限制: 524288 KB

sol：搞了大概一个多小时什么结果都没，被迫去看题解，感觉自己菜到家了qaq

大家一起膜henry_y神仙

/*
    原式
    f[i] = f[i-1]+f[i-2]
    T[n] = f[1]+f[2]*2+f[3]*3+...+f[n]*n

    令
        S[n] = f[1]+f[2]+f[3]+...+f[n]
    n*S[n] = n*f[1]+n*f[2]+n*f[3]+...+n*f[n]
    设
    --> P[n] = n*S[n]-T[n]
    --> P[n] = (n-1)*f[1]+(n-2)*f[2]+...+(n-n)*f[n]
    因为
    --> P[n-1] = (n-1)*S[n]-T[n-1]
    --> P[n-1] = (n-2)*f[1]+(n-3)*f[2]+...+(n-1-(n-1))*f[n-1]
    且
    --> S[n-1] = f[1]+f[2]+f[3]+....+f[n-1]
    所以
    P[n]=P[n-1]+S[n-1]
*/

/*
    P[i] S[i] f[i] f[i-1]

    1 0 0 0
    1 1 0 0
    0 1 1 1
    0 1 1 0
*/

矩阵

Ps：思路要打开

/*
    f[i] = f[i-1]+f[i-2]
    T[n] = f[1]+f[2]*2+f[3]*3+...+f[n]*n
    S[n] = f[1]+f[2]+f[3]+...+f[n]
    n*S[n] = n*f[1]+n*f[2]+n*f[3]+...+n*f[n]
    设
    --> P[n] = n*S[n]-T[n]
    --> P[n] = (n-1)*f[1]+(n-2)*f[2]+...+(n-n)*f[n]
    因为
    --> P[n-1] = (n-1)*S[n]-T[n-1]
    --> P[n-1] = (n-2)*f[1]+(n-3)*f[2]+...+(n-1-(n-1))*f[n-1]
    且
    --> S[n-1] = f[1]+f[2]+f[3]+....+f[n-1]
    所以
    P[n]=P[n-1]+S[n-1]

    P[i] S[i] f[i] f[i-1]

    1 0 0 0
    1 1 0 0
    0 1 1 1
    0 1 1 0
*/
#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
inline ll read()
{
    ll s=;
    bool f=;
    char ch=' ';
    while(!isdigit(ch))
    {
        f|=(ch=='-'); ch=getchar();
    }
    while(isdigit(ch))
    {
        s=(s<<)+(s<<)+(ch^); ch=getchar();
    }
    return (f)?(-s):(s);
}
#define R(x) x=read()
inline void write(ll x)
{
    if(x<)
    {
        putchar('-'); x=-x;
    }
    if(x<)
    {
        putchar(x+''); return;
    }
    write(x/);
    putchar((x%)+'');
    return;
}
#define W(x) write(x),putchar(' ')
#define Wl(x) write(x),putchar('\n')
ll n,nn,Mod;
ll ans[][],power[][],a[][],c[][];
inline void Ad(ll &X,ll Y)
{
    X+=Y;
    X-=(X>=Mod)?Mod:;
    return;
}
int main()
{
    int i,j,k;
    nn=n=read(); n--; R(Mod);
    ans[][]=ans[][]=;
    for(i=;i<=;i++) power[i][i]=;
    a[][]=a[][]=a[][]=a[][]=a[][]=a[][]=a[][]=a[][]=;
    while(n)
    {
        if(n&)
        {
            memset(c,,sizeof c);
            for(i=;i<=;i++) for(j=;j<=;j++) for(k=;k<=;k++)
            {
                Ad(c[i][j],power[i][k]*a[k][j]%Mod);
            }
            memmove(power,c,sizeof power);
        }
        memset(c,,sizeof c);
        for(i=;i<=;i++) for(j=;j<=;j++) for(k=;k<=;k++)
        {
            Ad(c[i][j],a[i][k]*a[k][j]%Mod);
        }
        memmove(a,c,sizeof a);
        n>>=;
    }
    memset(c,,sizeof c);
    for(i=;i<=;i++) for(j=;j<=;j++) for(k=;k<=;k++)
    {
        Ad(c[i][j],ans[i][k]*power[k][j]%Mod);
    }
    memmove(ans,c,sizeof ans);
    Wl((ans[][]*nn%Mod-ans[][]+Mod)%Mod);
    return ;
}
/*
input
5 5
output
1
*/