C++ :

#include<bits/stdc++.h>
using namespace std;
int n,a[1005],s[1005],ans; 
int main()
{
   cin>>n;
   for (int i=1;i<=n;i++)
   {
   	  cin>>a[i];
   	  s[i]=s[i-1]+a[i];
   }
   for (int i=1;i<=n;i++)
     for (int j=i;j<=n;j++)
        if ((s[j]-s[i-1])%7==0)
          ans++;
   cout<<ans<<endl;


	return 0;
}