Cod sursa(job #272647)

Utilizator RebelulDonea Ovidiu Rebelul Data 7 martie 2009 16:34:35
Problema Secv Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 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);
	fout<<dime;
	return 0;
}