NrSecvS

long long NrSecvS(int a[],int n,int S)
{
    int j=1,suma=0;
    long long nr=0;
    for(int i=1;i<=n;++i)
    {
        suma+=a[i];
        while(suma>S)
            nr+=(n-i+1),suma-=a[j],++j;
    }
    return nr;
}