Cod sursa(job #676207)

Utilizator MutescuMutescu Alexandru Mutescu Data 8 februarie 2012 20:36:11
Problema Secv Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.62 kb
#include<fstream>
using namespace std;
ifstream f("secv.in");
ofstream g("secv.out");
int i,j,k,l,maxx=5000,p,ptima,x,ci,z,y,v,a[100],pi, N;
int main (){
	f>>N;
	for(i=1;i<=N;i++)
		f>>a[i];
	
	pi=a[1];
	for (i=1;i<=N;i++){
		for (j=1;j<=N;j++){
			if((a[j]<pi)&&(a[j]!=0)){
				p=j;
				pi=a[j];}}
		
		for (j=i;j<=N;j++){
			if(a[j]>pi){
				l++;
				pi=a[j];
				ptima=j;}}
		z=ptima-p+1;
		if((maxx>z)&&(l>ci)){
			maxx=z;
			ci=l;
			l=0;
			x=p;
			y=ptima;
			v=pi;}
		l=0;
		for (k=1;k<=N;k++){
			if(a[k]==pi)
				a[k]=0;}
	}
	z=y-x+1;
	if(z<=0)
		g<<-1;
	else
		g<<z;
	return 0;
	}