P = int(input())
S = str(10**P)
L = len(S)
dp = [[[[0] * 2 for _ in range(3)] for _ in range(2)] for _ in range(L+1)]
dp[0][0][0][0] = 1

for i in range(L):
    for j in range(2):
        for d in range(10 if j else int(S[i])):
            for k in range(3):
                for l in range(2):
                    dp[i+1][j|(d<int(S[i]))][(k+d)%3][l|(d==3)] += dp[i][j][k][l]

print(dp[L][1][0][0]+dp[L][1][0][1]+dp[L][1][1][1]+dp[L][1][2][1]-1)