#include <bits/stdc++.h>
using namespace std;
// #include <atcoder/all>
// using namespace atcoder;

using ll = long long;
using ld  = long double;
using pll = pair<ll, ll>;
using pld = pair<ld, ld>;
const int INF=1e9+7;
const ll LINF=9223372036854775807;
const ll MOD=1e9+7;
const ld PI=acos(-1);
const ld EPS = 1e-10; //微調整用（EPSより小さいと0と判定など）

int ii() { int x; if (scanf("%d", &x)==1) return x; else return 0; }
long long il() { long long x; if (scanf("%lld", &x)==1) return x; else return 0; }
string is() { string x; cin >> x; return x; }
char ic() { char x; cin >> x; return x; }
void oi(int x) { printf("%d ", x); }
void ol(long long x) { printf("%lld ", x); }
void od_nosp(double x) { printf("%.15f", x); } // 古い問題用
void od(double x) { printf("%.15f ", x); }
// long doubleで受け取り、fをLfなどに変えて出力すると、変な数値が出る
// それをなんとかするには独自の出力を作らなければならなそう
void os(const string &s) { printf("%s ", s.c_str()); }
void oc(const char &c) { printf("%c ", c); }
#define o_map(v){cerr << #v << endl; for(const auto& xxx: v){cout << xxx.first << " " << xxx.second << "\n";}} //動作未確認
void br() { putchar('\n'); }

// #define gcd __gcd //llは受け取らない C++17~のgcdと違うので注意
// int lcm(int a, int b){return a / gcd(a, b) * b;}
#define b_e(a) a.begin(),a.end() //sort(b_e(vec));
#define REP(i,m,n) for(ll i=(ll)(m) ; i < (ll)(n) ; i++ )
#define DREP(i,m,n) for(ll i=(ll)(m) ; i > (ll)(n) ; i-- )
#define rep(i,n) REP(i,0,n)
#define m_p(a,b) make_pair(a,b)
#define p_b push_back
#define SZ(x) ((ll)(x).size()) //size()がunsignedなのでエラー避けに
#define endk '\n'


// coutによるpairの出力（空白区切り）
template<typename T1, typename T2> ostream& operator<<(ostream& s, const pair<T1, T2>& p) {return s << "(" << p.first << " " << p.second << ")";}
// coutによるvectorの出力（空白区切り）
template<typename T> ostream& operator<<(ostream& s, const vector<T>& v) {
  int len = v.size();
  for (int i = 0; i < len; ++i) {
    s << v[i]; if (i < len - 1) s << " "; //"\t"に変えるとTabで見やすく区切る
  }
  return s;
}
// coutによる多次元vectorの出力（空白区切り）
template<typename T> ostream& operator<<(ostream& s, const vector< vector<T> >& vv) {
  int len = vv.size();
  for (int i = 0; i < len; ++i) {
    s << vv[i] << endl;
  }
  return s;
}

//最大値、最小値の更新。更新したor等しければtrueを返す
template<typename T>
bool chmax(T& a, T b){return (a = max(a, b)) == b;}
template<typename T>
bool chmin(T& a, T b){return (a = min(a, b)) == b;}

//4近傍（上下左右） rep(i, 2) にすると右・下だけに進む
vector<int> dx_4 = {1, 0, -1, 0};
vector<int> dy_4 = {0, 1, 0, -1};

// -------- template end - //


// - library ------------- //

//nCk,nPk,nHk(mod MOD)の計算　n!とk!^{MOD-2}を前計算して求める
//n(nHkを使う場合はn+k)の最大値を設定すること（10^7で581ms 236MB, 3*10^7で1496ms 705MB）
ll maxNplsK = 10000; // n+kの最大値を代入(0 < n, k <= maxNplsK) nHkを使わないならmaxNでもいい
vector<ll> fac(maxNplsK+1); //i!(mod MOD) を格納。
vector<ll> inv(maxNplsK+1); //i^-1(iのモジュラ逆数 mod MOD)を格納
vector<ll> finv(maxNplsK+1); //i!^-1(i!のモジュラ逆数 mod MOD)

//aCbをmod計算
ll comb(ll a, ll b){
  if(a == 0 && b == 0)return 1;
  if(a < b || a < 0)return 0;
  ll tmp = finv.at(a - b)* finv.at(b) % MOD;
  return tmp * fac.at(a) % MOD;
}

//aPbをmod計算
ll perm(ll a, ll b){
  if(a < b) return 0;
  ll tmp = finv.at(a - b) % MOD;
  return tmp * fac.at(a) % MOD;
}

//aHbをmod計算
// 重複組合せ。異なるa種類のものから、重複を許してb"個"とる方法。
// ex) a, b → {a,a,a}{a,a,b}{a,b,b}{b,b,b}
ll dupc(ll a,ll b){
  if(a == 0 && b == 0)return 1;
  if(a < 0)return 0;
  if(b == 0) return 1;
  ll tmp = finv.at(a - 1)* finv.at(b) % MOD;
  return tmp * fac.at(a + b - 1) % MOD;
}

//ちなみに重複順列は、普通にn^r




// --------- library end - //



int main(){

//使う前に置いておく前計算（main()内でok）
//大した量ではないので，先にfac[i]とifac[i]を全て計算しておく
fac.at(0) = fac.at(1) = 1;
finv.at(0) = finv.at(1) = 1;
inv.at(1) = 1;
for (int i = 2; i < maxNplsK+1; i++){
  fac.at(i) = fac.at(i - 1) * i % MOD;
  inv.at(i) = MOD - inv.at(MOD % i) * (MOD / i) % MOD;
  finv.at(i) = finv.at(i - 1) * inv.at(i) % MOD;
}

  ll S = il();

  ll ans = 0;
  // 総和が S となるような d 桁の数列の数
  REP(d, 1, (S / 3) + 1){
    // d : 1 ~ floor(S/3)

    // 全て3以上は確定なので、
    ll tmpsum = S - d * 3;

    // tmpsum個の玉と、d - 1個の仕切り
    // tmpsum+1 C d-1
    ans += dupc(tmpsum+1, d-1);
    if (ans >= MOD) ans -= MOD;
  }

  cout << ans << endk;




}



Measured memory_bytes: 3920