/**/ /*
    题意:问[1,n]内有多少个数能被13整除,且包含子串"13"

    这题请教了龙教主  Orz

    对于这种[1,n]的,比较好的做法就是逐位统计
    对于当前位bit[i](i之前的所有位已确定),枚举[0,bit[i]),然后i之后的位自由变化
    对于自由变化的那些情况,可以预处理出来,那些是不需约束的情况
    (感觉就是按前缀分类计算,含0个前缀,1个前缀  的所有小于n的数)

    dp1[i][j][k]表示当前位为i,数字为j,余数为k,有13的个数
    dp2[i][j][k]表示当前位为i,数字为j,余数为k,没有13的个数
    
    数位统计时注意不要重复计算了    
*/

#include
< cstdio >
#include
< cstring >
#include
< algorithm >

using   namespace  std;

int  dp1[ 11 ][ 11 ][ 14 ],dp2[ 11 ][ 11 ][ 14 ];
int  ten[ 11 ],bit[ 11 ];

void  init()
{
    memset(dp1,
0,sizeof(dp1));
    memset(dp2,
0,sizeof(dp2));
    ten[
0= 1;
    
for(int i=1;i<10;i++)
        ten[i] 
= ten[i-1]*10;
    
for(int j=0;j<10;j++)
        dp2[
0][j][j] = 1;
    
for(int i=1;i<10;i++)//len
    for(int j=0;j<10;j++)
    
for(int jj=0;jj<10;jj++)
        
for(int k=0;k<13;k++)
        
{
            
int kk = (ten[i]*j+k)%13;//
            dp1[i][j][kk] += dp1[i-1][jj][k];
            
if(j==1&&jj==3)dp1[i][j][kk] += dp2[i-1][jj][k];
            
else dp2[i][j][kk] += dp2[i-1][jj][k];
        }

}


bool  chk( int  x)
{
    
char str[20];
    sprintf(str,
"%d",x);
    
for(int i=0;str[i+1];i++)
        
if(str[i]=='1' && str[i+1]=='3')return true;
    
return false;
}

int  main()
{
    init();
    
int n;
    
while(~scanf("%d",&n))
    
{
        
int nn = n,tot = 0;
        
while(nn>0)
        
{
            bit[tot
++= nn%10;
            nn
/=10;
        }

        
int ans = 0,last = 0,pre = 0;
        
bool flag = false;
        
if(chk(n) && n%13 == 0)ans++;
        
for(int i = tot-1;i>=0;i--)
        
{
            
for(int j = bit[i]-1;j>=0;j--)
            
{
                
for(int k=0;k<13;k++)
                
{
                    
int kk = (pre+k)%13;
                    
if(kk==0)
                    
{
                        ans 
+= dp1[i][j][k];
                        
if(flag)ans+=dp2[i][j][k];
                        
if(flag==0&&last==1&&j==3)ans += dp2[i][j][k];//这里需要加flag==0!
                        break;                                //若flag=1,这种情况就属于有前缀13的那种情况了
                    }
                                        //n = 1314
                }
                                            // 在131*时就已经算了1313的情况了
            }

            
if(last==1 && bit[i] ==3)flag = true;
            last 
= bit[i];
            pre 
+= bit[i]*ten[i];
        }

        printf(
"%d\n",ans);
    }

    
return 0;
}