#include<stdio.h>
#include<string.h>
#define y 2019
main(){
char s[200001];
scanf("%s",s);
long long a=0,S=0;
int d=1,i,l=strlen(s),mod[y]={1};
for(i=l-1;i>=0;i--){
	S=(S+(s[i]-'0')*d)%y;
	S%=y;
	mod[S]++;
	d=d*10%y;
}
for(i=0;i<y;i++)a+=(long long)mod[i]*(mod[i]-1)/2;
printf("%lld",a);
}