Cod sursa(job #274573)

Utilizator cristi_cChirac Cristian cristi_c Data 9 martie 2009 20:57:22
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<fstream.h>
ifstream f("divk.in");
ofstream g("divk.out");
int main()
{
long n,a,b,i,j,ok,s,s2=0,p,k;
long long v[16300];
f>>n>>k>>a>>b;
for (i=1;i<=n;i++)
f>>v[i];
for (i=2;i<=n-2;i++)
for (j=3;j<=n-1;j++)
{
s=0;
ok=1;
for (p=i;p<=j;p++)
s=s+(v[p]%k);
if (s%k==0) s2=s2+1;
}
g<<s2;
return 0;
}