Cod sursa(job #396947)

Utilizator beyond_k7aOnutu Catalin beyond_k7a Data 16 februarie 2010 09:17:11
Problema Secventa 5 Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.48 kb
#include<fstream>
using namespace std;
unsigned long a[10000005],n,x,y,nr,s;
int gas(int p,int n)
{
	int i;
	for(i=p;i<n;i++)
		if(a[n]==a[i])
			return 0;
	return 1;
}
int main()
{
	ifstream f("secv5.in");
	ofstream g("secv5.out");
	unsigned long i,j;
	f>>n>>x>>y;
	for(i=1;i<=n;i++)
		f>>a[i];
	s=0;
	for(i=1;i<n;i++)
	{
		nr=1;
		for(j=i+1;j<=n;j++)
		{
			nr+=gas(i,j);
			if(nr>=x && nr<=y)
				s++;
		}
	}
	g<<s;
	f.close();
	g.close();
	return 0;
}