//IN THE NAMME OF GOD

#include <bits/stdc++.h>
using namespace std;
int del=10513,ans;
bool prime[13890001];
string ss(int a){
    string s="";
    while(a){
        s.push_back(a%10+'0');
        a/=10;
    }
    for(int i=0;i<s.size()/2;i++)
        swap(s[i],s[s.size()-1-i]);
    return s;
}
int baze(int l,int r,string s){
    int h=0;
    for(int i=l;i<=r;i++){
        h*=10;
        h+=s[i]-'0';
    }
    return h;
}
int main(){
    for(int i=2;i*i<=1389000;i++){
        if(!prime[i]){
            for(int j=i*i;j<=1389000;j+=i)
                prime[j]=1;
        }
    }
    prime[1]=1;
    for(int i=1;i<=1389000;i++){
        string s=ss(i);
        for(int j=0;j<s.size();j++){
            for(int k=0;k<=j;k++){
                if(s[k]!='0'){
                    if(!prime[baze(k,j,s)])
                        ans++;
                }
            }
        }
    }
    cout<<ans%del<<endl;
    return 0;
}