#include <bits/stdc++.h>
using namespace std;
#define rep2(i,m,n) for (int i = (m); i < (n); ++i)
#define rep(i,n) rep2(i,0,n)
typedef long long int ll;
typedef long double ld;
typedef pair<int, int> P;
template<typename T> struct V : vector<T> { using vector<T>::vector; };
V() -> V<int>;
V(size_t) -> V<int>;
template<typename T> V(size_t, T) -> V<T>;
template<typename T> vector<T> make_vec(size_t n, T a) { return vector<T>(n, a); }
template<typename... Ts> auto make_vec(size_t n, Ts... ts) { return vector<decltype(make_vec(ts...))>(n, make_vec(ts...)); }
template<typename T> ostream &operator<<(ostream &os, const vector<T> &v) { for (auto &e : v) os << e << ' '; return os; }
struct fast_ios { fast_ios(){ cin.tie(nullptr); ios::sync_with_stdio(false); cout << fixed << setprecision(20); }; } fast_ios_;
template<typename T1,typename T2> inline void chmin(T1 &a,T2 b){if(a>b) a=b;}
template<typename T1,typename T2> inline void chmax(T1 &a,T2 b){if(a<b) a=b;}
const int INF = 1<<30;
const ll LINF = 1LL<<61;

int main()
{
    ll n;
    cin >> n;
    string s = to_string(n);
    int m = s.size();
    
    auto dp = make_vec(m+1, 10, 3, 2, 0);
    dp[0][0][0][0] = 1;
    
    rep(i,m) rep(j,10) rep(k,2) rep(l,3) //k=1:小さいことが確定している
    {
        int c = s[i] - '0';

        rep(d, 10)
        {
            int ni = i+1;
            int nj = d;
            int nk = k;
            int nl = (l+d)%3;
            if(k == 0 && d > c) continue;
            if(k == 0 && d < c) nk = 1;
            if(i > 0 && (j + nj) % 3 != 0) continue;
            dp[ni][nj][nk][nl] += dp[i][j][k][l];
        }
    }
    int ans = 0;
    rep(i,10){
        rep(j,2){
            ans += dp[m][i][j][0];
        }
    }
    cout << ans << endl;

    return 0;
}