#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include<math.h>
#define ll long long int

int matoi(char n){
  if(n=='0'){
    return 0;}
  if(n=='1'){
    return 1;}
  if(n=='2'){
    return 2;}
  if(n=='3'){
    return 3;}
  if(n=='4'){
    return 4;}
  if(n=='5'){
    return 5;}
  if(n=='6'){
    return 6;}
  if(n=='7'){
    return 7;}
  if(n=='8'){
    return 8;}
  if(n=='9'){
    return 9;}
  return 0;
}

int four(char s[],int i){
  return matoi(s[i])*1000+matoi(s[i+1])*100+matoi(s[i+2])*10+matoi(s[i+3]);
}

int main(){
  char s[200001];
  scanf("%s",s);

  int n=strlen(s);
  int tmp=0,k=1;
  int mod[2020]={};
  mod[0]=1;
  ll count=0;

  for(int i=n-1;i>=0;i--){
    tmp += matoi(s[i])*k;
    tmp %=2019;
    mod[tmp]++;
    //printf("%d\n",tmp);
    k *=10;
    k %=2019;}
  
  for(int i=0;i<2019;i++){
    count += mod[i]*(mod[i]-1)/2;}
	  
  printf("%lld\n",count);
  
  return 0;
}
