/*

    数位DP

    dp[i][j][0]表示i位数模13为j当前没有包含13并且最高位不为1的方案数；

    dp[i][j][0]表示i位数模13为j当前没有包含13并且最高位为1的方案数；

    dp[i][j][0]表示i位数模13为j当前包含13的方案数。

*/

#include<iostream>

#include<cstdio>

#include<cstring>

#define N 15

using namespace std;

int bit[N],dp[N][N][];

int dfs(int pos,int mod,int have,int lim){

    int num,ans,mod_x,have_x;

    if(pos<=) return mod==&&have==;

    if(!lim&&dp[pos][mod][have]!=-)

        return dp[pos][mod][have];

    num=lim?bit[pos]:;

    ans=;

    for(int i=;i<=num;i++){

        mod_x=(mod*+i)%;

        have_x=have;

        if(have==&&i==) have_x=;

        if(have==&&i!=) have_x=;

        if(have==&&i==) have_x=;

        ans+=dfs(pos-,mod_x,have_x,lim&&i==num);

    }

    if(!lim) dp[pos][mod][have]=ans;

    return ans;

}

int main(){

    int n,len;

    while(scanf("%d",&n)!=EOF){

        memset(bit,,sizeof(bit));

        memset(dp,-,sizeof(dp));

        len=;

        while(n){

            bit[++len]=n%;

            n/=;

        }

        printf("%d\n",dfs(len,,,));

    }

    return ;

}