//

 //by coolxxx

 //#include<bits/stdc++.h>

 #include<iostream>

 #include<algorithm>

 #include<string>

 #include<iomanip>

 #include<map>

 #include<stack>

 #include<queue>

 #include<set>

 #include<bitset>

 #include<memory.h>

 #include<time.h>

 #include<stdio.h>

 #include<stdlib.h>

 #include<string.h>

 //#include<stdbool.h>

 #include<math.h>

 #define min(a,b) ((a)<(b)?(a):(b))

 #define max(a,b) ((a)>(b)?(a):(b))

 #define abs(a) ((a)>0?(a):(-(a)))

 #define lowbit(a) (a&(-a))

 #define sqr(a) ((a)*(a))

 #define swap(a,b) ((a)^=(b),(b)^=(a),(a)^=(b))

 #define mem(a,b) memset(a,b,sizeof(a))

 #define eps (1e-8)

 #define J 10000

 #define mod 1000000007

 #define MAX 0x7f7f7f7f

 #define PI 3.14159265358979323

 #define N 20004

 using namespace std;

 typedef long long LL;

 int cas,cass;

 int n,m,lll,ans;

 int a[N];

 void gjdchengdjd(int a[],int b)

 {

     int i;

     for(i=;i<=a[];i++)

         a[i]*=b;

     for(i=;i<=a[];i++)

         a[i+]+=a[i]/J,a[i]%=J;

     while(a[a[]+])a[]++;

 }

 void gjdchudjd(int a[],int b)

 {

     int i;

     for(i=a[];i>;i--)

         a[i-]+=(a[i]%b)*J,a[i]/=b;

     a[]/=b;

     while(!a[a[]] && a[]>)a[]--;

 }

 void gjdprint(int a[])

 {

     int i;

     printf("%d",a[a[]]);

     for(i=a[]-;i;i--)

         printf("%04d",a[i]);

     puts("");

 }

 int main()

 {

     #ifndef ONLINE_JUDGE

 //    freopen("1.txt","r",stdin);

 //    freopen("2.txt","w",stdout);

     #endif

     int i,j,k;

     int x,y,z;

 //    for(scanf("%d",&cass);cass;cass--)

 //    for(scanf("%d",&cas),cass=1;cass<=cas;cass++)

 //    while(~scanf("%s",s+1))

     while(~scanf("%d",&n))

     {

         n++;

         a[]=a[]=;

         for(i=n+;i<=n+n;i++)

             gjdchengdjd(a,i);

         for(i=;i<=n+;i++)

             gjdchudjd(a,i);

         gjdprint(a);

     }

     return ;

 }

 /*

 //

 //

 */