#include <stdio.h>

int main(){
   char s[200001];
   int  i,j,k;
   long n;

   scanf("%s",s);
   n=0;
   for (i=0;s[i]!='\0';i++) {
      k=0;
      for (j=i;s[j]!='\0';j++) {
         k=(k*10+s[j]-'0')%2019;
         if (k==0) n++;
      }
   }
   printf("%ld\n",n);
   return 0;
}
