#include<iostream>
#include<cstdio>
#include<cmath>
#include<cstring>
#include<string>
using namespace std;
int a[1010000]={},s[1010000]={};
int jc(int a[],int n)
{
    memset(a,0,sizeof(a));
    a[0]=1;
    a[1]=1;
    int x;
    for(int j=2;j<=n;j++)
    {
        for(int i=1;i<=a[0];i++)
        {
        a[i]*=j;
        }
            for(int i=1;i<=a[0];i++)
            {
            if(a[i]>=10)
            {
                a[i+1]+=a[i]/10;
                a[i]%=10;
                if(i==a[0])a[0]++;
            }
        }
    }
    return 0;
}
int jiafa(int s[],int a[])
{
    for(int i=1;i<=s[0];i++)
    {
        s[i]+=a[i];
        if(s[i]>9)
        {
            s[i+1]+=s[i]/10;
            s[i]%=10;
        }
    }
    if(s[s[0]+1]!=0)s[0]++;
}
int bijiao(int s[],int a[])
{
    if(s[0]>=a[0])return 0;
    else return 1;
}
int main()
{
    int n;
    cin>>n;
    for(int i=1;i<=n;i++)
    {
        jc(a,i);
        if(bijiao(s,a))s[0]=a[0];
        jiafa(s,a);
    }
    for(int i=s[0];i>=1;i--)cout<<s[i];
}