#include using namespace std; using lint = long long int; template using V = vector; template using VV = V< V >; template void assign(V& v, int n, const T& a = T()) { v.assign(n, a); } template void assign(V& v, int n, const U&... u) { v.resize(n); for (auto&& i : v) assign(i, u...); } int main() { cin.tie(NULL); ios::sync_with_stdio(false); int p; cin >> p; string x(p + 1, '0'); x[0] = '1'; int n = x.size(); VV> dp; assign(dp, n + 1, 2, 3, 2); dp[0][1][0][0] = 1; for (int i = 0; i < n; i++) for (int r = 0; r < 3; r++) for (int d = 0; d < 10; d++) { dp[i + 1][0][(r + d) % 3][d == 3] += dp[i][0][r][0]; dp[i + 1][0][(r + d) % 3][1] += dp[i][0][r][1]; if (d > x[i] - '0') continue; dp[i + 1][d == x[i] - '0'][(r + d) % 3][d == 3] += dp[i][1][r][0]; dp[i + 1][d == x[i] - '0'][(r + d) % 3][1] += dp[i][1][r][1]; } lint res = 0; for (int f = 0; f < 2; f++) for (int r = 0; r < 3; r++) for (int g = 0; g < 2; g++) if (!r or g) res += dp[n][f][r][g]; cout << res - 1 << '\n'; }