Cod sursa(job #272649)

Utilizator RebelulDonea Ovidiu Rebelul Data 7 martie 2009 16:36:35
Problema Secv Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <fstream>
using namespace std;

const char in[]="secv.in";
const char out[]="secv.out";

long a[5001];
int n;

void citire()
{
	ifstream fin(in);
	fin>>n;
	for(int i=1;i<=n;i++)
		fin>>a[i];
}
int main()
{
	citire();
	int max=0,k=1,dime=0;
	while(n-max>0 && k<n)
	{
		int m=0;
		int q=k;
		for(int i=1;i<=n;i++)
			if(a[q]<a[i])
			{
				m++;
				q=i;
			}
		if(max<m)
		{
			max=m;
			dime=q-k+1;
		}
		k++;	
	}
	ofstream fout(out);
	if(dime==0)
		fout<<-1;
	else
		fout<<dime;
	return 0;
}