Cod sursa(job #36797)

Utilizator RobytzzaIonescu Robert Marius Robytzza Data 24 martie 2007 02:26:23
Problema Numarare triunghiuri Scor 70
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.56 kb
#include<fstream.h>
int main(){
ifstream fin("nrtri.in");
ofstream fout("nrtri.out");
short N;
long  a[800];
fin>>N;
for (short i=0;i<N;i++)
    fin>>a[i];
short ok=0;
int p=N;
long int S=0;
while (ok==0){
   ok=1;
   p--;
   for (short i=0;i<p;i++)
       if (a[i]>a[i+1]){
	   long  aux=a[i];
	   a[i]=a[i+1];
	   a[i+1]=aux;
	   ok=0;}   }
long int P=0;
short f=0;
for (short j=0;j<N-1;j++)
    for (short l=j+1;l<N;l++){
	P=a[j]+a[l];
    for (f=l+1;f<N;f++)
	 if  (P>=a[f])
		S++;}
fout<<S;
fin.close();
fout.close();
return 0;}