#include <fstream>

using namespace std;

ifstream f("kfib.in");
ofstream g("kfib.out");

long long a[2][2]= {{0,1},{0,0}};
long long c[2][2]= {{0,1},{1,1}};
long long sol[2][2]= {{1,0},{0,1}};
void inmultire(long long a[2][2],long long b[2][2])
{
    long long c[2][2];
    int i,j,k;
    for(i=0; i<2; i++)
        for(j=0; j<2; j++)
        {
            c[i][j]=0;
            for(k=0; k<2; k++)c[i][j]+=a[i][k]*b[k][j];
            c[i][j]=c[i][j]%666013;
        }
    for(i=0; i<2; i++)
        for(j=0; j<2; j++)a[i][j]=c[i][j];
}
void putere(long long sol[2][2],int k)
{
    while(k)
    {
        if(k%2==1)
        {
            inmultire(sol,c);
            k--;
        }
        else
        {
            inmultire(c,c);
            k=k/2;
        }
    }
}

int main()
{
    int n;
    f>>n;
    putere(sol,n);
    inmultire(a,sol);
    g<<a[0][0];
    return 0;
}