#include<stdio.h>
#include<math.h>
int i,j,k,t=1,m=1e9+7,r=0,a[200000];
char s[200001];
int main(){
    scanf("%s",s);
    for(i=0;s[i]!='\0';i++);
    for(j=--i;i>=0;i--){
        a[j-i]=((j-i-1<0?0:a[j-i-1])+(s[i]-48)*t)%2019;
        t=(t*10)%2019;
    }
    for(i=j;i>0;i--){
        if(a[i]==0)r++;
        for(k=0;k<i;k++)if(a[i]==a[k])r++;
    }
    printf("%d",r);
    return 0;
}