#include #include #include #include #include #include #include #include #include #include #include #define ll long long #define PLL pair #define VS vector #define VL vector #define VB vector #define VPLL vector > #define VVL vector > #define VVVL vector > > #define VVB vector > #define rep(i,a) for (ll i=0;i=0;i--) #define INF 1000000000000000000 #define PI 3.141592653589793238 #define vmin(vec) *std::min_element(vec.begin(),vec.end()) #define vmax(vec) *std::max_element(vec.begin(),vec.end()) #define vsum(vec) std::accumulate(vec.begin(),vec.end(),0LL) #define ksort(vec) sort(vec.begin(), vec.end(), greater()) #define ssort(vec) (vec.begin(),vec.end()) #define VPLLsort(vec) sort(vec.begin(), vec.end(),[](PLL &a, PLL &b){ return a.first < b.first; }); #define LTS(n) to_string(n) #define STL(str) stoll(str) using namespace std; /* int main() { ll n, d, k; cin >> n >> d >> k; VL x(n); rep(i, n) cin >> x[i]; ll maxi = -1; ll mini_index = 0; PLL ans; ans.first = 0; ans.second = 0; nrep(i,1, n){ if (maxi < x[i] - x[ans.first] && i-ans.first<=d){ maxi = x[i] - x[ans.first]; ans.second = i; }if (x[ans.first]>x[i]){ ans.first = i; }if (x[ans.first] == x[i]&&i-ans.first>=d){ mini_index = i; }if (maxid) break; if (x[i] == x[ans.first]) ans.first = i; } cout << maxi*k << endl; cout << ans.first << " " << ans.second << endl; } */ ll mod; ll pow(ll x, ll n){ x %= mod; if (n == 1) return x; if (n == 0) return 1; if (n % 2 == 0) return pow(x*x, n / 2) % mod; else return (pow(x, n - 1)*x) % mod; } int main(){ cin >> mod; ll num = 2017 % mod; ll num2 = (2017 * 2017)%mod; ll ans =1; rep(i, 2017) ans = (num2*ans) % mod; ll x = num +ans%mod; cout << x%mod << endl; return 0; }